From ae2b295c7deaf2d7c18ad1ed9b6050970e56bae7 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:05:31 -0800 Subject: Import Upstream version 5e2 --- hobbit.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'hobbit.scm') diff --git a/hobbit.scm b/hobbit.scm index 65dfff1..006719b 100644 --- a/hobbit.scm +++ b/hobbit.scm @@ -242,7 +242,7 @@ setcar setcdr listp list length append reverse list-ref memq memv member assq assv assoc symbolp symbol2string string2symbol numberp exactp inexactp eqp lessp zerop positivep negativep oddp evenp lmax lmin sum - product difference lquotient absval remainder lremainder modulo lgcd llcm + product difference lquotient scm_abs remainder lremainder modulo lgcd llcm number2string ;;; string2number makdbl istr2flo mkbig long2big dbl2big @@ -2492,7 +2492,7 @@ (@copy-tree "copytree" 1) (exact? "exactp" 1) (inexact? "inexactp" 1) - (odd? "oddp" 1) (even? "evenp" 1) (max "lmax" 2) (min "lmin" 2) (abs "absval" 1) + (odd? "oddp" 1) (even? "evenp" 1) (max "lmax" 2) (min "lmin" 2) (abs "scm_abs" 1) (quotient "lquotient" 2) (remainder "lremainder" 2) (modulo "modulo" 2) (gcd "lgcd" 2) (lcm "llcm" 2) @@ -2511,7 +2511,7 @@ (inexact->exact "in2ex" 1) (make-rectangular "makrect" 2) (make-polar "makpolar" 2) (real-part "real_part" 1) (imag-part "imag_part" 1) - (magnitude "magnitude" 1) (angle "angle" 1) + (magnitude "scm_magnitude" 1) (angle "angle" 1) (number->string "number2string" 2) (string->number "string2number" 1) -- cgit v1.2.3