[BACK]Return to file2.hh CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / plugin

Diff for /OpenXM/src/kan96xx/plugin/file2.hh between version 1.4 and 1.5

version 1.4, 2001/08/12 03:13:36 version 1.5, 2003/11/23 13:16:30
Line 1 
Line 1 
 /* $OpenXM: OpenXM/src/kan96xx/plugin/file2.hh,v 1.3 2000/02/24 12:33:48 takayama Exp $ */  /* $OpenXM: OpenXM/src/kan96xx/plugin/file2.hh,v 1.4 2001/08/12 03:13:36 takayama Exp $ */
 else if (strcmp(key,"fp2fdopen") == 0) {  else if (strcmp(key,"fp2fdopen") == 0) {
   if (size != 2) errorKan1("%s\n","[(fp2fdopen)  obj] extension obj-fp2.");    if (size != 2) errorKan1("%s\n","[(fp2fdopen)  obj] extension obj-fp2.");
   if (SecureMode) errorKan1("%s\n","Security violation for fp2fdopen.");    if (SecureMode) errorKan1("%s\n","Security violation for fp2fdopen.");
Line 108  else if (strcmp(key,"fp2clearReadBuf") == 0) {
Line 108  else if (strcmp(key,"fp2clearReadBuf") == 0) {
   }    }
   rob = KpoInteger(fp2dumpBuffer((FILE2 *) obj1.rc.voidp));    rob = KpoInteger(fp2dumpBuffer((FILE2 *) obj1.rc.voidp));
   rob = KpoInteger(fp2clearReadBuf((FILE2 *)obj1.rc.voidp));    rob = KpoInteger(fp2clearReadBuf((FILE2 *)obj1.rc.voidp));
   }
   else if (strcmp(key,"fp2fcloseInString") == 0) {
     if (size != 2) errorKan1("%s\n","[(fp2closeInString) obj-fp2] extension s.");
     obj1= getoa(obj,1);
     if (obj1.tag != Sfile) {
       errorKan1("%s\n","[(fp2fcloseInString)  obj-fp2] extension s.");
     }
     if (strcmp(obj1.lc.str,MAGIC2) != 0) {
       errorKan1("%s\n","[(fp2fcloseInString)  obj-fp2] extension s. obj-fp2 is not Sfile (FILE2).");
     }
     {
       int mysize;
       rob = KpoString(fp2fcloseInString((FILE2 *) obj1.rc.voidp,&mysize));
     }
 }  }
 else if (strcmp(key,"fp2pushfile") == 0) {  else if (strcmp(key,"fp2pushfile") == 0) {
   if (size != 2) errorKan1("%s\n","[(fp2pushfile) name] extension array-of-int.");    if (size != 2) errorKan1("%s\n","[(fp2pushfile) name] extension array-of-int.");

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

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>