From fbbc50caf8eb97b88cd51bff3b62e084e32b6cf6 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Sun, 11 May 2008 22:03:50 +0200 Subject: [PATCH] remove define-private * module/language/scheme/translate.scm: Remove define-private. --- module/language/scheme/translate.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/module/language/scheme/translate.scm b/module/language/scheme/translate.scm index 3d2c13a6e..afa2276db 100644 --- a/module/language/scheme/translate.scm +++ b/module/language/scheme/translate.scm @@ -187,7 +187,7 @@ ((,obj) (make-ghil-quasiquote e l (trans-quasiquote e l obj))) (else (bad-syntax)))) - ((define define-private) ;; what is define-private? + ((define) (pmatch tail ;; (define NAME VAL) ((,name ,val) (guard (symbol? name)) -- 2.20.1