diff options
author | patacongo <patacongo@42af7a65-404d-4744-a932-0658087f49c3> | 2008-01-06 15:34:22 +0000 |
---|---|---|
committer | patacongo <patacongo@42af7a65-404d-4744-a932-0658087f49c3> | 2008-01-06 15:34:22 +0000 |
commit | 12b4f1cc8bca7de8373c4949767cd8ecf29a89d8 (patch) | |
tree | bed2fc224036183b64bdc8e7367728ee7bcff6c9 /misc/pascal/insn16/prun | |
parent | 9714df0891d803f1e2311e7acf29a9fbabe72a49 (diff) | |
download | nuttx-12b4f1cc8bca7de8373c4949767cd8ecf29a89d8.tar.gz nuttx-12b4f1cc8bca7de8373c4949767cd8ecf29a89d8.tar.bz2 nuttx-12b4f1cc8bca7de8373c4949767cd8ecf29a89d8.zip |
NuttX runtime build success
git-svn-id: svn://svn.code.sf.net/p/nuttx/code/trunk@515 42af7a65-404d-4744-a932-0658087f49c3
Diffstat (limited to 'misc/pascal/insn16/prun')
-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;
|