In reply to Thomas Schatzl:
Another optimization for your patch is to set a var to length(s) at the beginning of the proc, and use the var instead. It's called often enough that a little time could be shaved off.Post your free ad now! Yahoo! Canada Personals__
Florian Klaempfl schrieb:
Thomas Schatzl wrote:
Sterling Bates schrieb:
This patch adds recognition for hex to Val().
Applied.
What about the extended (?) pascal convention 16# ?
Done. =)
But until asking you to have a look at it, I've some questions:
- for non-64 bit CPUs there's a fpc_val_in
Thomas Schatzl wrote:
> Sterling Bates schrieb:
>
>> This patch adds recognition for hex to Val().
Applied.
What about the extended (?) pascal convention 16# ?
___
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/
Sterling Bates schrieb:
This patch adds recognition for hex to Val().
+ '0' : if (code < length(s)) and (s[code+1]='x') then
+begin
+ base := 16;
+ Inc(code, 2);
+end;
Here's a patch (Delphi also accepts uppercased X) and optimization for
the
This patch adds recognition for hex to Val().
SterlingPost your free ad now! Yahoo! Canada PersonalsIndex: sstrings.inc
===
RCS file: /FPC/CVS/fpc/rtl/inc/sstrings.inc,v
retrieving revision 1.35
diff -w -b -i -u -p -1 -0 -r1.35 sstri