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

Diff of /gcl/o/gbc.c

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

revision 1.4 by camm, Sat Jul 20 07:10:55 2002 UTC revision 1.5 by camm, Sun Jul 21 03:41:18 2002 UTC
# Line 1353  DEFVAR("*GBC-MESSAGE*",sSAgbc_messageA,S Line 1353  DEFVAR("*GBC-MESSAGE*",sSAgbc_messageA,S
1353  void  void
1354  init_GBC(void) {  init_GBC(void) {
1355    
   int i,j;  
   
1356    make_si_function("ROOM-REPORT", siLroom_report);    make_si_function("ROOM-REPORT", siLroom_report);
1357    make_si_function("RESET-GBC-COUNT", siLreset_gbc_count);    make_si_function("RESET-GBC-COUNT", siLreset_gbc_count);
1358    make_si_function("GBC-TIME",siLgbc_time);    make_si_function("GBC-TIME",siLgbc_time);
# Line 1362  init_GBC(void) { Line 1360  init_GBC(void) {
1360  #ifdef SGC  #ifdef SGC
1361    /* we use that maxpage is a power of 2 in this    /* we use that maxpage is a power of 2 in this
1362       case, to quickly be able to look in our table */       case, to quickly be able to look in our table */
1363    for(i=j=1 ; i< 32 ; i++)    {
1364      if (MAXPAGE == (1 <<i))      int i,j;
1365        j=0;    
1366    if (j) {      for(i=j=1 ; i< 32 ; i++)
1367      perror("MAXPAGE is not a power of 2.  Recompile");        if (MAXPAGE == (1 <<i))
1368      exit(1);          j=0;
1369        if (j) {
1370          perror("MAXPAGE is not a power of 2.  Recompile");
1371          exit(1);
1372        }
1373        make_si_function("SGC-ON",siLsgc_on);
1374    
1375    }    }
   make_si_function("SGC-ON",siLsgc_on);  
1376  #endif    #endif  
1377  }  }

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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