basic gc and closures sketon

1 files changed, 3 insertions, 1 deletions

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;