diff options
author | Ludovic Courtès <ludo@gnu.org> | 2011-07-07 00:57:58 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2011-07-07 00:57:58 +0200 |
commit | 86e449a69987ecb943b11198e065bbb22526f8c5 (patch) | |
tree | 641419991d083ed8964dd574890c1566abc888b0 | |
parent | f67f85817cd207aa99c90d9ef4d36e89769a145d (diff) | |
download | guile-86e449a69987ecb943b11198e065bbb22526f8c5.tar.gz |
Fix typo in (language tree-il spec).
* module/language/tree-il/spec.scm (join): Use EXPS in the error case.
-rw-r--r-- | module/language/tree-il/spec.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/language/tree-il/spec.scm b/module/language/tree-il/spec.scm index 1c6611b4e..3ad372709 100644 --- a/module/language/tree-il/spec.scm +++ b/module/language/tree-il/spec.scm @@ -35,7 +35,7 @@ ((,x) x) ((,x . ,rest) (make-seq #f x (join rest env))) - (else (error "what!" x rest env)))) + (else (error "what!" exps env)))) (define-language tree-il #:title "Tree Intermediate Language" |