summaryrefslogtreecommitdiff
path: root/shared
diff options
context:
space:
mode:
Diffstat (limited to 'shared')
-rw-r--r--shared/data-directed-programming.rkt2
1 files changed, 1 insertions, 1 deletions
diff --git a/shared/data-directed-programming.rkt b/shared/data-directed-programming.rkt
index 4b4762c..92a7e14 100644
--- a/shared/data-directed-programming.rkt
+++ b/shared/data-directed-programming.rkt
@@ -246,4 +246,4 @@
(let ((raised-proc (get op (map type-tag raised-args))))
(if raised-proc
(towerdrop (apply raised-proc (map contents raised-args)))
- (error "Could not apply --" (list op args raised-args)))))))))
+ (error "Could not apply --" (list op raised-args)))))))))