version 1.17, 2006/05/06 09:40:26 |
version 1.20, 2018/11/02 01:33:26 |
|
|
/* $OpenXM: OpenXM/src/k097/d.c,v 1.16 2005/06/16 05:07:24 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/k097/d.c,v 1.19 2016/04/02 08:20:09 ohara Exp $ */ |
/* simple.c, 1996, 1/1 --- 1/5 */ |
/* simple.c, 1996, 1/1 --- 1/5 */ |
#include <stdio.h> |
#include <stdio.h> |
#include <ctype.h> |
#include <ctype.h> |
Line 605 KCerror(char *s) /* You need this function. Otherwis |
|
Line 605 KCerror(char *s) /* You need this function. Otherwis |
|
ungetc(MARK_CHAR,stdin); |
ungetc(MARK_CHAR,stdin); |
while (fsgetc(Inop) > MARK_CHAR) ; |
while (fsgetc(Inop) > MARK_CHAR) ; |
} |
} |
return ; |
return 0; |
LONGJMP(KCenvOfParser,2); |
LONGJMP(KCenvOfParser,2); |
exit(1); |
exit(1); |
} |
} |
|
|
if (c == EOF) { |
if (c == EOF) { |
fprintf(stderr,"%d: Unexpected end of file in a comment.\n",Linenumber); |
fprintf(stderr,"%d: Unexpected end of file in a comment.\n",Linenumber); |
fsungetc(c,Inop); /* should change */ |
fsungetc(c,Inop); /* should change */ |
return; |
return 0; |
} |
} |
if (c == '*') { |
if (c == '*') { |
c = fsgetc(Inop); |
c = fsgetc(Inop); |
if (c == '/') return; |
if (c == '/') return 0; |
} |
} |
} |
} |
} |
} |
Line 1089 void loadFileWithCpp(objectp op) |
|
Line 1089 void loadFileWithCpp(objectp op) |
|
} |
} |
/* printf("%s\n",outfile); */ |
/* printf("%s\n",outfile); */ |
if ((char *)strstr(cpp,"/asir/bin/cpp.exe") == NULL) { |
if ((char *)strstr(cpp,"/asir/bin/cpp.exe") == NULL) { |
#if defined(__APPLE_CC__) |
#if defined(__clang__) || defined(__FreeBSD__) |
|
/* cpp of the FreeBSD is the cpp of the clang, but gcc is selected by configure. |
|
echo | gcc -dM -E - |
|
*/ |
sprintf(tmpName,"cpp -E -P %s | sed -e 's/^#.*//g' >%s",sfile,outfile); |
sprintf(tmpName,"cpp -E -P %s | sed -e 's/^#.*//g' >%s",sfile,outfile); |
#else |
#else |
argv[0] = cpp; |
argv[0] = cpp; |
Line 1106 void loadFileWithCpp(objectp op) |
|
Line 1109 void loadFileWithCpp(objectp op) |
|
argv[3] = cygwinPathToWinPath(outfile); |
argv[3] = cygwinPathToWinPath(outfile); |
argv[4] = NULL; |
argv[4] = NULL; |
} |
} |
#if defined(__APPLE_CC__) |
#if defined(__clang__) || defined(__FreeBSD__) |
system(tmpName); |
system(tmpName); |
#else |
#else |
n=oxForkExecBlocked(argv); |
n=oxForkExecBlocked(argv); |