[foo-cvs] fooelk/src heap-sc.c,1.1.1.1,1.2

[Martin R. <ru...@us...>]

Update of /cvsroot/foo/fooelk/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3928

Modified Files:
	heap-sc.c 
Log Message:
switched from sbrk() to malloc() in order to avoid heap size maximum on mac

Index: heap-sc.c
===================================================================
RCS file: /cvsroot/foo/fooelk/src/heap-sc.c,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** heap-sc.c	6 Aug 2004 20:56:42 -0000	1.1.1.1
--- heap-sc.c	23 Jan 2005 14:47:18 -0000	1.2
***************
*** 33,37 ****
  extern void Uncatchable_Error (char *);
  extern unsigned int Stack_Size ();
! extern void *sbrk();
  
  #define Recursive_Visit(p) {\
--- 33,38 ----
  extern void Uncatchable_Error (char *);
  extern unsigned int Stack_Size ();
! /* extern void *sbrk(); */
! extern void *malloc();
  
  #define Recursive_Visit(p) {\
***************
*** 54,58 ****
      register unsigned int s = 2 * k;
  
!     if ((Hp = Heap_Start = (char *)sbrk (s)) == (char *)-1)
          Fatal_Error ("cannot allocate heap (%u KBytes)", 2*size);
      Heap_End = Heap_Start + k;
--- 55,63 ----
      register unsigned int s = 2 * k;
  
!     /* we use malloc() instead of sbrk() in the hope that it's working
!      * sbrk caused problems on mac related to RLIMIT_DATA being too small
!      */
! /*     if ((Hp = Heap_Start = (char *)sbrk (s)) == (char *)-1) */
!     if ((Hp = Heap_Start = (char *)malloc (s)) == NULL)
          Fatal_Error ("cannot allocate heap (%u KBytes)", 2*size);
      Heap_End = Heap_Start + k;