Tokenize a string with escaping: Difference between revisions

Content added Content deleted
(Added Algol 68)
(→‎{{header|ALGOL 68}}: fixed comment)
Line 74: Line 74:
ELSE
ELSE
# at least one character #
# at least one character #
# allow for a string composed entirely of escape characters #
# allow for a string composed entirely of delimiter characters #
[ 1 : ( UPB s - LWB s ) + 3 ]STRING result;
[ 1 : ( UPB s - LWB s ) + 3 ]STRING result;
INT r pos := 1;
INT r pos := 1;