Changeset 651 for trunk/ab5.0


Ignore:
Timestamp:
Nov 3, 2008, 10:21:23 PM (16 years ago)
Author:
イグトランス (egtra)
Message:

ワイド文字列を引数に取るコンストラクタで、誤ったポインタの扱いを修正。

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ab5.0/ablib/src/Classes/System/String.ab

    r634 r651  
    3535
    3636        Sub String(initStr As PCWSTR, start As Long, length As Long)
    37             If start < 0 Or length Or start + length < 0 Then
    38                 Throw New ArgumentOutOfRangeException("String constractor: One or more arguments are out of range value.", "start or length or both")
    39             End If
    40             validPointerCheck(initStr + start, length)
    41             Assign(initStr + start, length)
     37            If start < 0 Or length < 0 Then
     38                Throw New ArgumentOutOfRangeException("start or length or both")
     39            End If
     40            validPointerCheck(VarPtr(initStr[start]), length)
     41            Assign(VarPtr(initStr[start]), length)
    4242        End Sub
    4343
Note: See TracChangeset for help on using the changeset viewer.