conservatory
/
ikarus
4
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fixes bug 173001: r5rs values exported by rnrs library 

* The following bindings were removed from (rnrs): 
  exact->inexact inexact->exact quotient modulo remainder string-set! string-fill!
This commit is contained in:
Abdulaziz Ghuloum 2007-11-30 05:13:01 -05:00
parent 05bc37fe57
commit ebc4deea60
3 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scheme/last-revision
View File

@ -1 +1 @@
1144 1145

14
scheme/makefile.ss
View File

@ -1039,18 +1039,18 @@
[remove i r ls] [remove i r ls]
[set-car! i mp se] [set-car! i mp se]
[set-cdr! i mp se] [set-cdr! i mp se]
[string-set! i r ms se] [string-set! i ms se]
[string-fill! i r ms se] [string-fill! i ms se]
[command-line i r pr] [command-line i r pr]
[exit i r pr] [exit i r pr]
[delay i r5 se ne] [delay i r5 se ne]
[exact->inexact i r r5 se] [exact->inexact i r5 se]
[force i r5 se] [force i r5 se]
[inexact->exact i r r5 se] [inexact->exact i r5 se]
[modulo i r r5 se] [modulo i r5 se]
[remainder i r r5 se] [remainder i r5 se]
[null-environment i r5 se] [null-environment i r5 se]
[quotient i r r5 se] [quotient i r5 se]
[scheme-report-environment i r5 se] [scheme-report-environment i r5 se]
[close-port i r ip] [close-port i r ip]
[eol-style i r ip] [eol-style i r ip]

3
src/ikarus-main.c
View File

@ -30,6 +30,7 @@
#include <signal.h> #include <signal.h>
#include <sys/mman.h> #include <sys/mman.h>
void register_handlers(); void register_handlers();
void register_alt_stack(); void register_alt_stack();
@ -257,7 +258,7 @@ register_alt_stack(){
exit(-1); exit(-1);
} }
struct sigaltstack sa; stack_t sa;
sa.ss_sp = stk; sa.ss_sp = stk;
sa.ss_size = SIGSTKSZ; sa.ss_size = SIGSTKSZ;
sa.ss_flags = 0; sa.ss_flags = 0;