From 0fc9b1e8ece3cd48a59fd0c80210c718bf08000d Mon Sep 17 00:00:00 2001 From: Isaac Shoebottom Date: Thu, 24 Apr 2025 11:56:09 -0300 Subject: [PATCH] minor --- Final/3.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Final/3.rkt b/Final/3.rkt index 5b1a48b..dd003f5 100644 --- a/Final/3.rkt +++ b/Final/3.rkt @@ -133,7 +133,7 @@ (heap-set! thing 'forwarded) (heap-set! (+ thing 1) (gc:closure code-ptr free-vars)))] [else - (error 'forward/loc "Unknown tag: ~a" tag)])) + (error 'forward/loc "unknown tag: ~a" tag)])) (define (object-size addr) @@ -146,7 +146,7 @@ (+ 3 n-vars))] [(equal? tag 'forwarded) 2] [else - (error 'object-size "Unknown tag: ~a" tag)])) + (error 'object-size "unknown tag: ~a" tag)])) (define (gc! . other-roots) (swap-spaces!)