[Yap-commits] CVS: H Heap.h,1.6,1.7 Yapproto.h,1.1.1.1,1.2 yapio.h,1.5,1.6

[Vitor S. C. <vs...@us...>]

Update of /cvsroot/yap/H
In directory usw-pr-cvs1:/tmp/cvs-serv1211/H

Modified Files:
	Heap.h Yapproto.h yapio.h 
Log Message:
fixes tohandle interrupts ^C in Windows.
Improvements to configure scripts for WIN32 configurations.
--with-readline= option for configure


Index: Heap.h
===================================================================
RCS file: /cvsroot/yap/H/Heap.h,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- Heap.h	2001/06/11 17:40:16	1.6
+++ Heap.h	2001/06/22 17:53:36	1.7
@@ -47,6 +47,12 @@
   yamop tableanswerresolutioncode;
 #endif /* TABLING */
   OPCODE failcode;
+  OPCODE failcode_1;
+  OPCODE failcode_2;
+  OPCODE failcode_3;
+  OPCODE failcode_4;
+  OPCODE failcode_5;
+  OPCODE failcode_6;
   OPCODE trustfailcode;
   struct {
     OPCODE op;
@@ -244,6 +250,8 @@
     functor_change_module,
     functor_current_module,
     functor_mod_switch,
+    functor_u_minus,
+    functor_u_plus,
     functor_v_bar,
     functor_var;
   Term
@@ -426,6 +434,8 @@
 #define  FunctorChangeModule      heap_regs->functor_change_module
 #define  FunctorCurrentModule     heap_regs->functor_current_module
 #define  FunctorModSwitch         heap_regs->functor_mod_switch
+#define  FunctorUMinus            heap_regs->functor_u_minus
+#define  FunctorUPlus             heap_regs->functor_u_plus
 #define  FunctorVBar              heap_regs->functor_v_bar
 #define  FunctorVar               heap_regs->functor_var
 #define  TermDollarU              heap_regs->term_dollar_u

Index: Yapproto.h
===================================================================
RCS file: /cvsroot/yap/H/Yapproto.h,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -r1.1.1.1 -r1.2
--- Yapproto.h	2001/04/09 19:53:39	1.1.1.1
+++ Yapproto.h	2001/06/22 17:53:36	1.2
@@ -244,7 +244,7 @@
 void	STD_PROTO(InitSysbits,(void));
 void	STD_PROTO(InitSysPreds,(void));
 int     STD_PROTO(TrueFileName, (char *, char *, int));
-void	STD_PROTO(ProcessSIGINT,(void));
+int	STD_PROTO(ProcessSIGINT,(void));
 double  STD_PROTO(yap_random, (void));
 
 /* tracer.c */

Index: yapio.h
===================================================================
RCS file: /cvsroot/yap/H/yapio.h,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- yapio.h	2001/06/12 17:25:28	1.5
+++ yapio.h	2001/06/22 17:53:36	1.6
@@ -33,7 +33,11 @@
 #define YP_clearerr     clearerr
 #define YP_feof		feof
 #define YP_ferror	ferror
+#if _MSC_VER || defined(__MINGW32__)
+#define YP_fileno	_fileno
+#else
 #define YP_fileno	fileno
+#endif
 #define YP_fopen	fopen
 #define YP_fclose	fclose
 #define YP_ftell	ftell
@@ -44,6 +48,19 @@
 #define YP_fdopen	fdopen
 #define init_yp_stdio()
 
+#if _MSC_VER || defined(__MINGW32__)
+#define open _open
+#define close _close
+#define popen _popen
+#define pclose _pclose
+#define read _read
+#define write _write
+#define isatty _isatty
+#define putenv(S) _putenv(S)
+#define chdir(P) _chdir(P)
+#define getcwd(B,S) _getcwd(B,S)
+#endif
+
 #define YP_FILE		FILE
 extern int YP_stdin;
 extern int YP_stdout;
@@ -298,3 +315,10 @@
 #define HashFunction(CHP,OUT) { (OUT)=0; while(*(CHP) != '\0') (OUT) += *(CHP)++; (OUT) %= MaxHash; }
 
 extern jmp_buf IOBotch;
+
+#if HAVE_LIBREADLINE
+extern jmp_buf readline_jmpbuf;
+#endif
+
+extern int in_getc, sigint_pending;
+