From f6b93fa139b4bbaa89a5e3e725f498275ca8d296 Mon Sep 17 00:00:00 2001
From: lemon <lsof@mailbox.org>
Date: Sat, 8 Oct 2022 21:02:30 +0200
Subject: basic gc and closures sketon

---
 pez.h | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'pez.h')

diff --git a/pez.h b/pez.h
index 063905c..08fce17 100644
--- a/pez.h
+++ b/pez.h
@@ -14,6 +14,7 @@ enum {
     PEZ_TNumber,
     PEZ_TBool,
     PEZ_TString,
+    PEZ_TFnProto,
     PEZ_TFn,
     PEZ_TTuple,
     PEZ_TRecord,
@@ -96,10 +97,11 @@ pez_fixmul(PezNumber a, PezNumber b)
 static inline PezNumber
 pez_fixdiv(PezNumber a, PezNumber b)
 {
+    int64_t tmp;
     if (b == 0) {
         return a >= 0 ? INT32_MAX : INT32_MIN;
     }
-    int64_t tmp = (uint64_t)a << 12;
+    tmp = (uint64_t)a << 12;
     /*
     if ((tmp < 0) == (b < 0)) {
         tmp += b >> 1;
-- 
cgit v1.2.3