/[gcl]/gcl/o/main.c
ViewVC logotype

Diff of /gcl/o/main.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.62 by camm, Thu Jun 16 17:02:19 2005 UTC revision 1.63 by camm, Thu Sep 22 21:07:42 2005 UTC
# Line 499  initlisp(void) { Line 499  initlisp(void) {
499          Cnil->s.s_mflag = FALSE;          Cnil->s.s_mflag = FALSE;
500          Cnil->s.s_hash = ihash_equal1(Cnil,0);          Cnil->s.s_hash = ihash_equal1(Cnil,0);
501                    
502          Ct->c.c_cdr=Ct;          set_type_of(Ct,t_symbol);
503          Ct->s.s_dbind = Ct;          Ct->s.s_dbind = Ct;
504          Ct->s.s_sfdef = NOT_SPECIAL;          Ct->s.s_sfdef = NOT_SPECIAL;
505          Ct->s.s_fillp = 1;          Ct->s.s_fillp = 1;

Legend:
Removed from v.1.62  
changed lines
  Added in v.1.63

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26