| version 1.1, 2003/11/24 02:33:39 |
version 1.5, 2018/05/02 21:25:38 |
|
|
| /* $OpenXM$ */ |
/* $OpenXM: OpenXM/src/kan96xx/trans/yymain_polymake.c,v 1.4 2004/07/15 07:50:40 takayama Exp $ */ |
| #include <stdio.h> |
#include <stdio.h> |
| #include "yylex_polymake.h" |
#include "yylex_polymake.h" |
| #include "yy_polymake.tab.h" |
#include "yy_polymake.tab.h" |
| |
|
| |
|
| char *SS=NULL; |
char *SS=NULL; |
| main_t() { |
main_t() { |
| int c,type; |
int c,type; |
|
|
| while ((c=getchar()) != EOF) { |
while ((c=getchar()) != EOF) { |
| pmPutstr(c); |
pmPutstr(c); |
| } |
} |
| |
pmPutstr('\n'); |
| SS = pmPutstr(0); |
SS = pmPutstr(0); |
| printf("%s\n",SS); |
printf("%s\n",SS); |
| pmSetS(SS); |
pmSetS(SS); |
|
|
| |
|
| main() { |
main() { |
| int c,type; |
int c,type; |
| |
GC_INIT(); |
| pmPutstr(-1); |
pmPutstr(-1); |
| while ((c=getchar()) != EOF) { |
while ((c=getchar()) != EOF) { |
| pmPutstr(c); |
pmPutstr(c); |
| } |
} |
| |
pmPutstr('\n'); |
| SS = pmPutstr(0); |
SS = pmPutstr(0); |
| |
#ifdef DEBUG |
| printf("%s\n",SS); |
printf("%s\n",SS); |
| |
#endif |
| pmSetS(SS); |
pmSetS(SS); |
| pmPreprocess(); |
pmPreprocess(); |
| |
#ifdef DEBUG |
| printf("--------------------------\n"); |
printf("--------------------------\n"); |
| printf("%s\n",SS); |
printf("%s\n",SS); |
| printf("--------------------------\n"); |
printf("--------------------------\n"); |
| |
#endif |
| PMparse(); |
PMparse(); |
| } |
} |
| |
|
| sGC_malloc(int n) { |
void *sGC_malloc(int n) { |
| return GC_malloc(n); |
return GC_malloc(n); |
| } |
} |
| |
|
| PMerror() { |
PMerror() { |
| |
fprintf(stderr,"Parse error. cf. yylex_polymake.c: PM_debug=1;\n"); |
| } |
} |