shithub: MicroHs

Download patch

ref: f94adb915e9ae1e9ef3740ac2fb662471c2016e7
parent: 5a2593dc1185d6b5597e53c8d4d05a31f8462624
author: Lennart Augustsson <lennart@augustsson.net>
date: Sun Sep 1 02:17:40 EDT 2024

Fix typo

--- a/src/runtime/eval.c
+++ b/src/runtime/eval.c
@@ -2322,7 +2322,7 @@
     memerr();
   fp->next = ofp;
   fin->back = fp;
-  if (fp->payload.size != NOSIZE)
+  if (ofp->payload.size != NOSIZE)
     fp->payload.size = ofp->payload.size - s;
   fp->payload.string = (uint8_t*)ofp->payload.string + s;
   fp->finalizer = fin;
--