diff options
Diffstat (limited to 'misc/pascal/insn16/prun')
-rw-r--r-- | misc/pascal/insn16/prun/pexec.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/misc/pascal/insn16/prun/pexec.c b/misc/pascal/insn16/prun/pexec.c index 0c099d298..10204ae3c 100644 --- a/misc/pascal/insn16/prun/pexec.c +++ b/misc/pascal/insn16/prun/pexec.c @@ -308,7 +308,7 @@ static uint16 pexec_libcall(struct pexec_s *st, uint16 subfunc) ubyte *dest;
ubyte *name;
int len;
- int value;
+ sint32 value;
switch (subfunc)
{
@@ -599,7 +599,7 @@ static uint16 pexec_libcall(struct pexec_s *st, uint16 subfunc) len = TOS(st, 2); /* Number of bytes in string */
src = (ubyte*)&GETSTACK(st, TOS(st, 3)); /* Pointer to string */
-
+
/* Make a C string out of the pascal string */
name = pexec_mkcstring(src, len);
|