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

Diff of /gcl/o/bind.c

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

revision 1.13 by mjthomas, Tue Nov 2 00:57:44 2004 UTC revision 1.14 by camm, Tue Jun 14 14:33:55 2005 UTC
# Line 866  check_other_key(object l, int n, ...) Line 866  check_other_key(object l, int n, ...)
866  /*         }; */  /*         }; */
867    
868    
869  object Cstd_key_defaults[15]={Cnil,Cnil,Cnil,Cnil,Cnil,Cnil,Cnil,  object Cstd_key_defaults[15]={0};
                                 Cnil,Cnil,Cnil,Cnil,Cnil,Cnil,Cnil,Cnil};  
870    
871  /* FIXME rewrite this */  /* FIXME rewrite this */
872  /* static int */  /* static int */
# Line 1131  gcl_init_bind(void) Line 1130  gcl_init_bind(void)
1130          six_nils.nil6_self[3] = Cnil;          six_nils.nil6_self[3] = Cnil;
1131          six_nils.nil6_self[4] = Cnil;          six_nils.nil6_self[4] = Cnil;
1132          six_nils.nil6_self[5] = Cnil;          six_nils.nil6_self[5] = Cnil;
1133    
1134            {
1135    
1136              int i;
1137              for (i=0;i<sizeof(Cstd_key_defaults)/sizeof(*Cstd_key_defaults);i++)
1138                Cstd_key_defaults[i]=Cnil;
1139    
1140            }
1141    
1142  }  }

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

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