RosettaCodeData/Task/Tokenize-a-string/Pop11/tokenize-a-string-2.pop11

11 lines
276 B
Plaintext

lvars list;
sysparse_string('one 1 two 2 three 3 four 4', true) -> list;
;;; print the list of strings and numbers
list =>
** [one 1 two 2 three 3 four 4]
;;; check that first item is a string and second an integer
isstring(list(1))=>
** <true>
isinteger(list(2))=>
** <true>