summaryrefslogtreecommitdiffstats
path: root/cring.scm
diff options
context:
space:
mode:
authorBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:31 -0800
committerBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:31 -0800
commit5145dd3aa0c02c9fc496d1432fc4410674206e1d (patch)
tree540afc30c51da085f5bd8ec3f4c89f6496e7900d /cring.scm
parent8466d8cfa486fb30d1755c4261b781135083787b (diff)
downloadslib-5145dd3aa0c02c9fc496d1432fc4410674206e1d.tar.gz
slib-5145dd3aa0c02c9fc496d1432fc4410674206e1d.zip
Import Upstream version 3a2upstream/3a2
Diffstat (limited to 'cring.scm')
-rw-r--r--cring.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/cring.scm b/cring.scm
index 97a637d..76459a2 100644
--- a/cring.scm
+++ b/cring.scm
@@ -21,9 +21,8 @@
(require 'relational-database)
(require 'databases)
(require 'sort)
-(require-if '(not inexact) 'logical) ;for integer-expt
-(define number^ (if (provided? 'inexact) expt integer-expt))
+(define number^ expt)
(define number* *)
(define number+ +)
(define number- -)