Bläddra i källkod

corrected brk and sbrk somewhat

ceriel 36 år sedan
förälder
incheckning
7e90e9638c
2 ändrade filer med 3 tillägg och 3 borttagningar
  1. 2 2
      lang/cem/libcc/mon/brk.e
  2. 1 1
      lang/cem/libcc/mon/sbrk.e

+ 2 - 2
lang/cem/libcc/mon/brk.e

@@ -28,14 +28,14 @@
 
  exp $brk
  pro $brk,0
- lal 0
- loi EM_PSIZE
  lpi $ctch
  sig
  lae .1
  sti EM_PSIZE
  loc 0
  ste .2
+ lal 0
+ loi EM_PSIZE
  str 2          ; The - possibly - occurring trap is caught
  lae .1
  loi EM_PSIZE

+ 1 - 1
lang/cem/libcc/mon/sbrk.e

@@ -38,7 +38,7 @@
  ste .2
  lol 0
  ads EM_WSIZE	; this is the new heap pointer, but watch out for overflow!
- dup EM_WSIZE
+ dup EM_PSIZE
  lor 2
  cmp		; compare with old heap pointer
  zlt *1