[gforth] / gforth / engine / main.c  

gforth: gforth/engine/main.c

Diff for /gforth/engine/main.c between version 1.100 and 1.101

version 1.100, Thu Jan 30 16:14:31 2003 UTC version 1.101, Sat Feb 1 14:28:07 2003 UTC
Line 264 
Line 264 
               fprintf(stderr,"Primitive %lx, %d of group %d used in this image at $%lx is not implemented by this\n engine (%s); executing this code will crash.\n", (long)-token, tok, group, (long)&image[i],PACKAGE_VERSION);                fprintf(stderr,"Primitive %lx, %d of group %d used in this image at $%lx is not implemented by this\n engine (%s); executing this code will crash.\n", (long)-token, tok, group, (long)&image[i],PACKAGE_VERSION);
           }            }
         } else {          } else {
           // if base is > 0: 0 is a null reference so don't adjust            /* if base is > 0: 0 is a null reference so don't adjust*/
           if (token>=base) {            if (token>=base) {
             image[i]+=(Cell)start;              image[i]+=(Cell)start;
           }            }


Generate output suitable for use with a patch program
Legend:
Removed from v.1.100  
changed lines
  Added in v.1.101

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help