From 5145dd3aa0c02c9fc496d1432fc4410674206e1d Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:05:31 -0800 Subject: Import Upstream version 3a2 --- cring.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'cring.scm') 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- -) -- cgit v1.2.3