mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-18 09:40:25 +02:00
Code Activity

make C system primitives throw exceptions

Browse source
This commit is contained in:
Gary Houston 1996-08-02 23:26:33 +00:00
parent cb0016401f
commit 02b754d3a6
10 changed files with 415 additions and 454 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/numbers.c
View file

@ -3488,7 +3488,7 @@ void scm_two_doubles(z1, z2, sstring, xy)
SCM_PROC(s_sys_expt, "%expt", 2, 0, 0, scm_sys_expt);
SCM_PROC(s_sys_expt, "$expt", 2, 0, 0, scm_sys_expt);
#ifdef __STDC__
SCM
scm_sys_expt(SCM z1, SCM z2)
@ -3506,7 +3506,7 @@ scm_sys_expt(z1, z2)
SCM_PROC(s_sys_atan2, "%atan2", 2, 0, 0, scm_sys_atan2);
SCM_PROC(s_sys_atan2, "$atan2", 2, 0, 0, scm_sys_atan2);
#ifdef __STDC__
SCM
scm_sys_atan2(SCM z1, SCM z2)