From c52225f9a919f8e9fb15139280695db01367385a Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 24 May 2016 23:34:59 -0400 Subject: [PATCH] Fixed example program --- test-opt2.scm | 1 + 1 file changed, 1 insertion(+) diff --git a/test-opt2.scm b/test-opt2.scm index 9b247ae2..41526aab 100644 --- a/test-opt2.scm +++ b/test-opt2.scm @@ -7,6 +7,7 @@ (scheme eval) ) +(define *num-passed* 0) (define (assert:equal msg actual expected) (if (not (equal? actual expected)) (error "Unit test failed [" msg "] actual [" actual "] expected [" expected "]")