Improve sbrk() on OS/2
Ilya Zakharevich [Sun, 18 Oct 1998 23:20:57 +0000 (19:20 -0400)]
Message-Id: <199810190320.XAA28249@monk.mps.ohio-state.edu>

p4raw-id: //depot/perl@2063

os2/os2.c

index 19b9f59..6c2d67a 100644 (file)
--- a/os2/os2.c
+++ b/os2/os2.c
@@ -5,6 +5,8 @@
 #define INCL_DOSERRORS
 #include <os2.h>
 
+#include <sys/uflags.h>
+
 /*
  * Various Unix compatibility functions for OS/2
  */
@@ -1633,6 +1635,7 @@ Perl_OS2_init(char **env)
     MALLOC_INIT;
     settmppath();
     OS2_Perl_data.xs_init = &Xs_OS2_init;
+    _uflags (_UF_SBRK_MODEL, _UF_SBRK_ARBITRARY);
     if (environ == NULL) {
        environ = env;
     }