diff options
Diffstat (limited to 'misc/pascal/insn16/prun/pexec.c')
-rw-r--r-- | misc/pascal/insn16/prun/pexec.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/misc/pascal/insn16/prun/pexec.c b/misc/pascal/insn16/prun/pexec.c index 686f3d776..8249d55c6 100644 --- a/misc/pascal/insn16/prun/pexec.c +++ b/misc/pascal/insn16/prun/pexec.c @@ -560,7 +560,7 @@ static uint16 pexec_libcall(struct pexec_s *st, ubyte fileno, uint16 subfunc) /* Then transfer the string contents */
- memcpy(dest, src, len);
+ memcpy(dest, src, uparm1);
ref[1] = uparm1;
}
break;
|