===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/trans/yymain_polymake.c,v
retrieving revision 1.1
retrieving revision 1.8
diff -u -p -r1.1 -r1.8
--- OpenXM/src/kan96xx/trans/yymain_polymake.c	2003/11/24 02:33:39	1.1
+++ OpenXM/src/kan96xx/trans/yymain_polymake.c	2020/11/01 10:28:21	1.8
@@ -1,15 +1,17 @@
-/* $OpenXM$ */
+/* $OpenXM: OpenXM/src/kan96xx/trans/yymain_polymake.c,v 1.7 2020/10/06 11:33:48 takayama Exp $ */
 #include <stdio.h>
 #include "yylex_polymake.h"
 #include "yy_polymake.tab.h"
 
+
 char *SS=NULL;
-main_t() {
+int main_t() {
   int c,type;
   pmPutstr(-1);
   while ((c=getchar()) != EOF) {
 	pmPutstr(c);
   }
+  pmPutstr('\n');
   SS = pmPutstr(0);
   printf("%s\n",SS);
   pmSetS(SS);
@@ -24,28 +26,38 @@ main_t() {
 	}
 	printf("\n");
   }
+  return 0;
 }
 
-main() {
+int PMparse();
+
+int main() {
   int c,type;
-  
+  GC_INIT();  
   pmPutstr(-1);
   while ((c=getchar()) != EOF) {
 	pmPutstr(c);
   }
+  pmPutstr('\n');
   SS = pmPutstr(0);
+#ifdef DEBUG
   printf("%s\n",SS);
+#endif
   pmSetS(SS);
   pmPreprocess();
+#ifdef DEBUG
   printf("--------------------------\n");
   printf("%s\n",SS);
   printf("--------------------------\n");
+#endif
   PMparse();
+  return 0;
 }
 
-sGC_malloc(int n) {
+void *sGC_malloc(int n) {
   return GC_malloc(n);
 }
 
-PMerror() {
+void PMerror() {
+  fprintf(stderr,"Parse error. cf. yylex_polymake.c: PM_debug=1;\n");
 }