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

* numbers.c (scm_fuck): Procedure removed; looks like old test code.

Browse source
This commit is contained in:
Jim Blandy 1996-12-17 21:21:01 +00:00
parent 0032595465
commit 073621cd66
1 changed files with 0 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

9
libguile/numbers.c
View file

@ -2850,15 +2850,6 @@ scm_num2dbl (a, why)
} }
SCM_PROC(s_fuck, "fuck", 1, 0, 0, scm_fuck);
SCM
scm_fuck (a)
SCM a;
{
return scm_makdbl (scm_num2dbl (a, "just because"), 0.0);
}
SCM_PROC1 (s_divide, "/", scm_tc7_asubr, scm_divide); SCM_PROC1 (s_divide, "/", scm_tc7_asubr, scm_divide);
SCM SCM