From 64f037d91e0c9296dcaef9a0ff3eb33b19a2ed34 Mon Sep 17 00:00:00 2001 From: Bryan Newbold Date: Mon, 20 Feb 2017 00:05:38 -0800 Subject: Import Upstream version 3a5 --- mularg.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'mularg.scm') diff --git a/mularg.scm b/mularg.scm index 4bfac03..e1bc5af 100644 --- a/mularg.scm +++ b/mularg.scm @@ -6,5 +6,5 @@ ((null? (cdr ds)) (op d1 (car ds))) (else (for-each (lambda (d) (set! d1 (op d1 d))) ds) d1)))) ;@ -(define / (let ((/ /)) (mul:argumentizer /))) -(define - (let ((- -)) (mul:argumentizer -))) +(define / (mul:argumentizer /)) +(define - (mul:argumentizer -)) -- cgit v1.2.3