Changeset 668

Timestamp:

Dec 30, 2008, 1:57:55 PM (16 years ago)

Author:

dai

Message:

ReadImplメソッド内で配列の要素に対して整数以外の値が指定されていたタイプミスを修正。

File:

• trunk/ab5.0/ablib/src/Classes/System/IO/TextReader.ab (modified) (1 diff)

trunk/ab5.0/ablib/src/Classes/System/IO/TextReader.ab

@@ -156 +156 @@
         Wend
         ReadImpl = Math.Min(buf.Length - pos, count)
-        ActiveBasic.Strings.ChrCopy(buffer, VarPtr(p[buf]), ReadImpl As SIZE_T)
+        ActiveBasic.Strings.ChrCopy(buffer, VarPtr(p[pos]), ReadImpl As SIZE_T)
         pos += ReadImpl
     End Function