From e2081d0d8280f4c2f17fdf4cc7d3fb5f0b36c48b Mon Sep 17 00:00:00 2001
From: Luke Lau <luke_lau@icloud.com>
Date: Wed, 14 Aug 2019 14:12:09 +0100
Subject: [PATCH] Fix typo

---
 codegen.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/codegen.scm b/codegen.scm
index 9c692e7..9ffee77 100644
--- a/codegen.scm
+++ b/codegen.scm
@@ -168,7 +168,7 @@
 				(map cdr stack-sizes)))]
 					; 0  2  6  8  16
 	   [relative-offsets (map - totals (map cdr stack-sizes))]
-	   [absolute-offsets (map (lambda (x) (- si x)) b)])
+	   [absolute-offsets (map (lambda (x) (- si x)) relative-offsets)])
       (map cons (map car stack-sizes) absolute-offsets)))
   
   (let* (
-- 
2.30.2