I need a programmer to build a customized I/O unit that will be
contributed to the FPC Unit Library. He/she must have expertise in
low-level I/O access for both Linux and Windows. The work would be on a
contract basis. For details (including the unit interface), please see
http://angelbase.com/pas
>>You can simply download the latest RTL sources. from
>>ftp://ftp.freepascal.org/pub/fpc/source
>>and compile it. You don't need the whole compiler for it.
>
>Done, but:
>CompareStr('hello', 'hello world') still gives 0.
>
>Strange!!!
Sorry. That's Ok now.
--
Jilani Khaldi
http://www.jilani.net
>You can simply download the latest RTL sources. from
>ftp://ftp.freepascal.org/pub/fpc/source
>and compile it. You don't need the whole compiler for it.
Done, but:
CompareStr('hello', 'hello world') still gives 0.
Strange!!!
--
Jilani Khaldi
http://www.jilani.net
__
On Sat, 15 Feb 2003, Jilani Khaldi wrote:
> >> >At least for FPC 1.0.6, it's in file rtl/objpas/sysstr.inc, lines 109 - 110
> >> >:
> >> >You should replace these two lines
> >> > if Count1 > Count2 then result := ord(s1[Count1 + 1])
> >> > else result := -ord(s2[Count2 + 1]);
> >> >with
> >
>> >At least for FPC 1.0.6, it's in file rtl/objpas/sysstr.inc, lines 109 - 110
>> >:
>> >You should replace these two lines
>> > if Count1 > Count2 then result := ord(s1[Count1 + 1])
>> > else result := -ord(s2[Count2 + 1]);
>> >with
>> > if Count1 > Count2 then result := ord(s1[Count + 1])
On Sat, 15 Feb 2003, Jilani Khaldi wrote:
> >At least for FPC 1.0.6, it's in file rtl/objpas/sysstr.inc, lines 109 - 110
> >:
> >You should replace these two lines
> > if Count1 > Count2 then result := ord(s1[Count1 + 1])
> > else result := -ord(s2[Count2 + 1]);
> >with
> > if Count1 > Cou
>At least for FPC 1.0.6, it's in file rtl/objpas/sysstr.inc, lines 109 - 110
>:
>You should replace these two lines
> if Count1 > Count2 then result := ord(s1[Count1 + 1])
> else result := -ord(s2[Count2 + 1]);
>with
> if Count1 > Count2 then result := ord(s1[Count + 1])
> else result := -o
