=================================================================== RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/primitive.c,v retrieving revision 1.23 retrieving revision 1.25 diff -u -p -r1.23 -r1.25 --- OpenXM/src/kan96xx/Kan/primitive.c 2016/03/31 03:22:54 1.23 +++ OpenXM/src/kan96xx/Kan/primitive.c 2018/09/07 00:15:44 1.25 @@ -1,4 +1,4 @@ -/* $OpenXM: OpenXM/src/kan96xx/Kan/primitive.c,v 1.22 2013/11/06 06:44:48 takayama Exp $ */ +/* $OpenXM: OpenXM/src/kan96xx/Kan/primitive.c,v 1.24 2016/03/31 05:27:34 takayama Exp $ */ /* primitive.c */ /* The functions in this module were in stackmachine.c */ @@ -14,7 +14,7 @@ #include "kclass.h" #include #include -#include "../plugin/mysig.h" +#include "mysig.h" int PrintDollar = 1; /* flag for printObject() */ int PrintComma = 1; /* flag for printObject() */ @@ -281,7 +281,7 @@ void printObject(ob,nl,fp) printObjectList(&ob); break; case Sfile: - fprintf(fp,"Name=%s, FILE *=%x ",ob.lc.str,(int) ob.rc.file); + fprintf(fp,"Name=%s, FILE *=%p ",ob.lc.str,ob.rc.file); break; case Sring: fprintf(fp,"Ring."); KshowRing(KopRingp(ob));