From: ceriel Date: Thu, 15 Oct 1987 12:59:03 +0000 (+0000) Subject: Some minor adaptions X-Git-Tag: release-5-5~3803 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=5c7379738b36ca952736a7b8f45cf1ae41f35d8a;p=ack.git Some minor adaptions --- diff --git a/lang/cem/libcc/gen/frexp.e b/lang/cem/libcc/gen/frexp.e index a3a9701f5..77109c9b6 100644 --- a/lang/cem/libcc/gen/frexp.e +++ b/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 diff --git a/lang/cem/libcc/gen/head_cc.e b/lang/cem/libcc/gen/head_cc.e index c7d66c7ca..d46249ae1 100644 --- a/lang/cem/libcc/gen/head_cc.e +++ b/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 diff --git a/lang/cem/libcc/gen/malloc.c b/lang/cem/libcc/gen/malloc.c index 9fc97f6ac..11258c004 100644 --- a/lang/cem/libcc/gen/malloc.c +++ b/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) diff --git a/lang/cem/libcc/gen/modf.e b/lang/cem/libcc/gen/modf.e index c10623a79..fd51a7dfe 100644 --- a/lang/cem/libcc/gen/modf.e +++ b/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