From 07d5a8085bbcc21a1d9d06a2976ecc00e9c8d55b Mon Sep 17 00:00:00 2001
From: Andreas Rumpf <rumpf_a@web.de>
Date: Sat, 23 Aug 2008 11:16:44 +0200
Subject: too many changes to list

---
 nim/lexbase.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'nim/lexbase.pas')

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
-- 
cgit 1.4.1-2-gfad0