From 5bccd56659ea72a6f85d71503f7cc4512bc45950 Mon Sep 17 00:00:00 2001 From: Mike Vink Date: Fri, 5 May 2023 17:41:26 +0200 Subject: finishing up 87 --- shared/data-directed-programming.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'shared/data-directed-programming.rkt') 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))))))))) -- cgit v1.2.3