Numerical and alphabetical suffixes: Difference between revisions

m
→‎{{header|zkl}}: clean up REs
m (→‎{{header|zkl}}: reword test so it makes sense)
m (→‎{{header|zkl}}: clean up REs)
Line 749:
fcn naSuffixes(numStr){
var [const]
numRE=RegExp(0'^([+-]*\.*\d+[.]*\d*[Ee]E*[+-]*\d*)^),
bangRE=RegExp(0'^(!+)^);
 
Line 756:
nstr=nstr[numRE.matched[0][1],*];
r:=numRE.matched[1];
if(r.matches("*[.eEE]*")) r=r.toFloat(); // arg!
else r=BI(r);
 
reg z;
Anonymous user