diff options
author | Andreas Rumpf <rumpf_a@web.de> | 2008-08-23 11:16:44 +0200 |
---|---|---|
committer | Andreas Rumpf <rumpf_a@web.de> | 2008-08-23 11:16:44 +0200 |
commit | 07d5a8085bbcc21a1d9d06a2976ecc00e9c8d55b (patch) | |
tree | b07a53afeb56f4bba917c1a3a843f48dd25b62be /nim/lexbase.pas | |
parent | 916c25f9a70b68eb7a5e2c45d7cc2e10c6e3a525 (diff) | |
download | Nim-07d5a8085bbcc21a1d9d06a2976ecc00e9c8d55b.tar.gz |
too many changes to list
Diffstat (limited to 'nim/lexbase.pas')
-rw-r--r-- | nim/lexbase.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/nim/lexbase.pas b/nim/lexbase.pas index f02c375ff..c840dc6d2 100644 --- a/nim/lexbase.pas +++ b/nim/lexbase.pas @@ -227,7 +227,7 @@ begin L.linenumber := 1; // lines start at 1 L.fileOpened := false; if L.bufLen > 0 then begin - copyMem(L.buf, addr(buffer[strStart]), L.bufLen); + copyMem(L.buf, {@cast}pointer(buffer), L.bufLen); L.buf[L.bufLen-1] := EndOfFile; end else |