[gforth] / gforth / engine / main.c  

gforth: gforth/engine/main.c

Diff for /gforth/engine/main.c between version 1.111 and 1.112

version 1.111, Wed May 14 09:28:44 2003 UTC version 1.112, Thu May 15 18:43:16 2003 UTC
Line 629 
Line 629 
           of (char) and @ instead of >code-address */            of (char) and @ instead of >code-address */
     return (*b)->start - (*a)->start;      return (*b)->start - (*a)->start;
 }  }
   #endif /* !defined(NO_DYNAMIC) */
   
 static char superend[]={  static char superend[]={
 #include "prim_superend.i"  #include "prim_superend.i"
 };  };
 #endif /* !defined(NO_DYNAMIC) */  
   
 Cell npriminfos=0;  Cell npriminfos=0;
   
Line 1155 
Line 1155 
   }    }
 #elif defined(INDIRECT_THREADED)  #elif defined(INDIRECT_THREADED)
   return;    return;
 #else /* defined(DOUBLY_INDIRECT) || defined(INDIRECT_THREADED) */  #else /* !(defined(DOUBLY_INDIRECT) || defined(INDIRECT_THREADED)) */
   static Cell *instps[MAX_BB];    static Cell *instps[MAX_BB];
   static short origs[MAX_BB];    static short origs[MAX_BB];
   static short optimals[MAX_BB];    static short optimals[MAX_BB];
Line 1177 
Line 1177 
     rewrite_bb(instps,optimals,ninsts);      rewrite_bb(instps,optimals,ninsts);
     ninsts=0;      ninsts=0;
   }    }
 #endif /* defined(DOUBLY_INDIRECT) || defined(INDIRECT_THREADED) */  #endif /* !(defined(DOUBLY_INDIRECT) || defined(INDIRECT_THREADED)) */
 }  }
   
 #if defined(PRINT_SUPER_LENGTHS) && !defined(NO_DYNAMIC)  #if defined(PRINT_SUPER_LENGTHS) && !defined(NO_DYNAMIC)

Generate output suitable for use with a patch program
Legend:
Removed from v.1.111  
changed lines
  Added in v.1.112
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help