File mosml-prototypes.patch of Package mosml

Overview Repositories Revisions Requests Users Attributes Meta

File mosml-prototypes.patch of Package mosml

Index: mosml/src/Makefile.inc
===================================================================
--- mosml.orig/src/Makefile.inc
+++ mosml/src/Makefile.inc
@@ -17,8 +17,8 @@ PERL=perl
 ADDPRIMS=dynlib.c
 ADDOBJS=dynlib.o
 ADDRUNLIBS=-ldl
-ADDRUNCFLAGS=$(RPM_OPT_FLAGS)
-ADDDYNLIBCFLAGS=$(RPM_OPT_FLAGS)
+ADDRUNCFLAGS=-DANSI $(RPM_OPT_FLAGS)
+ADDDYNLIBCFLAGS=-DANSI $(RPM_OPT_FLAGS)
 
 # To compile the runtime system camlrunm under Cygwin with support for
 # dynamically loadable libraries (DDLs), uncomment these:
Index: mosml/src/launch/camlexec.tpl
===================================================================
--- mosml.orig/src/launch/camlexec.tpl
+++ mosml/src/launch/camlexec.tpl
@@ -1,3 +1,5 @@
+#include <unistd.h>
+
 char * runtime_name = "BINDIR/camlrunm";
 char * errmsg = "Cannot exec camlrunm.\n";
 
Index: mosml/src/mosmlyac/main.c
===================================================================
--- mosml.orig/src/mosmlyac/main.c
+++ mosml/src/mosmlyac/main.c
@@ -2,6 +2,9 @@
 #ifdef ANSI
 #include <string.h>
 #endif
+#include <stdlib.h>
+#include <stdio.h>
+#include <unistd.h>
 #include "defs.h"
 
 char dflag;
Index: mosml/src/mosmlyac/reader.c
===================================================================
--- mosml.orig/src/mosmlyac/reader.c
+++ mosml/src/mosmlyac/reader.c
@@ -1,7 +1,7 @@
 #ifdef ANSI
 #include <string.h>
 #endif
-
+#include <stdlib.h>
 #include "defs.h"
 
 /*  The line size must be a positive integer.  One hundred was chosen	*/
@@ -271,6 +271,7 @@ int keyword(void)
     }
     syntax_error(lineno, line, t_cptr);
     /*NOTREACHED*/
+    return 0;
 }
 
 
Index: mosml/src/dynlibs/intinf/intinf.c
===================================================================
--- mosml.orig/src/dynlibs/intinf/intinf.c
+++ mosml/src/dynlibs/intinf/intinf.c
@@ -1,6 +1,7 @@
 /* intinf.c -- partial interface to the GNU GMP multi-precision library.
    sestoft@dina.kvl.dk 1995, 1998-04-20 */
 
+#include <stdlib.h>
 #include <gmp.h>
 
 /* Access to the camlrunm/Moscow ML runtime data representation: */
@@ -311,6 +312,7 @@ value largeint_set_str(value dest, value
     { return Val_unit; }
   else
     { failwith("Ill-formed number string"); }
+  return Val_unit;
 }
 
 value largeint_get_str(value src, value base)		
Index: mosml/src/dynlibs/mpq/mpq.c
===================================================================
--- mosml.orig/src/dynlibs/mpq/mpq.c
+++ mosml/src/dynlibs/mpq/mpq.c
@@ -2,6 +2,7 @@
    sestoft@dina.kvl.dk 1998-10-29, 1998-11-04 */
 
 #include <stdlib.h>
+#include <string.h>
 
 /* Access to the camlrunm/Moscow ML runtime data representation: */
 
@@ -216,6 +217,7 @@ EXTERNML value pq_resultstatus(value pgr
   default: 
     failwith("mpq:pg_resultstatus: internal error");
   }
+  return Atom(Bad_response);
 }
 
 /* ML type : pgresult_ -> int */
Index: mosml/src/dynlibs/munix/munix.c
===================================================================
--- mosml.orig/src/dynlibs/munix/munix.c
+++ mosml/src/dynlibs/munix/munix.c
@@ -4,11 +4,13 @@
 
 /* General includes */
 
+#include <stdlib.h>
 #include <errno.h>
 #include <unistd.h>
 #include <signal.h>
 #include <sys/types.h>
 #include <sys/wait.h>
+#include <stdio.h>
 
 /* Moscow ML includes */
 
@@ -126,6 +128,7 @@ EXTERNML value unix_execute(value cmd, v
     // Never gets here
     return Val_unit;
   }
+  return Val_unit;
 }
 
 /* ML type: int -> int */
Index: mosml/src/dynlibs/msocket/msocket.c
===================================================================
--- mosml.orig/src/dynlibs/msocket/msocket.c
+++ mosml/src/dynlibs/msocket/msocket.c
@@ -203,6 +203,8 @@ static value from_saddr(union saddr *s,
     return newaddr(sizeof(struct sockaddr_in), AF_INET, sinaddrport);
   }
   } 
+  value res;
+  return res;
 }
 
 void failure()

Places

File mosml-prototypes.patch of Package mosml

Places