Quellcode durchsuchen

Some minor adaptions

ceriel vor 37 Jahren
Ursprung
Commit
5cdd696646

+ 2 - 0
lang/cem/libcc/gen/frexp.e

@@ -17,6 +17,7 @@
  */
 
  mes 2,EM_WSIZE,EM_PSIZE
+#ifndef NOFLOAT
  exp $frexp
  pro $frexp,0
  lal 0
@@ -27,3 +28,4 @@
  sti EM_WSIZE
  ret EM_DSIZE
  end
+#endif

+ 3 - 3
lang/cem/libcc/gen/head_cc.e

@@ -30,11 +30,11 @@ _penvp
  exp $m_a_i_n
  pro $m_a_i_n,0
 #if EM_WSIZE==1
- ldc 256
+ ldc 1288	; EIOVFL | EIUND | ECONV
 #else
- loc 256
+ loc 1288
 #endif
- sim            ; EIUND is ignored
+ sim            ; ignored
  lal EM_WSIZE+EM_PSIZE
  loi EM_PSIZE
  lae environ

+ 1 - 1
lang/cem/libcc/gen/malloc.c

@@ -18,7 +18,7 @@ extern bcopy();
 #define BUGFIX	0
 #endif
 
-extern char *sbrk();
+extern char *sbrk(), *brk();
 static char *bottom, *top;
 
 static grow(len)

+ 2 - 0
lang/cem/libcc/gen/modf.e

@@ -17,6 +17,7 @@
  */
 
  mes 2,EM_WSIZE,EM_PSIZE
+#ifndef NOFLOAT
  exp $modf
  pro $modf,0
  lal 0
@@ -31,3 +32,4 @@
  sti EM_DSIZE
  ret EM_DSIZE
  end
+#endif