Mercurial > repos > tabletprog
view samples/stringops.tp @ 288:a4c2b31acba7
Add utf8 method to integer types for converting a number into a utf8 string made up of the corresponding character code
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Tue, 22 Jul 2014 21:31:41 -0700 |
parents | 32964a4e7a33 |
children | 056b8ad76559 |
line wrap: on
line source
#{ main <- { print: "foo: " . 42 . "\n" print: (string: (length: "foo" . "bar")) . "\n" print: (string: ("foobarbaz" find: "foo" else: { "not found" })) . "\n" print: (string: ("foobarbaz" find: "bar" else: { "not found" })) . "\n" print: (string: ("foobarbaz" find: "baz" else: { "not found" })) . "\n" print: (string: ("foobarbaz" find: "qux" else: { "not found" })) . "\n" print: ("foobarbaz" from: 3) . "\n" print: ("foobarbaz" from: 3 withLength: 3) . "\n" foreach: ("foo,bar,baz,qux" splitOn: ",") :idx val { print: val . "\n" } res <- "foobarbaz" partitionOn: "bar" print: "Before: " . (res before) . "\n" print: "After: " . (res after) . "\n" print: (string: ("12abcDEF" parseHex32)) . "\n" print: (string: ("FFFFFFFFFF" parseHex64)) . "\n" print: "'" . (" \nfoobar baz " ltrim) . "'\n" print: (72 utf8) . (101 utf8) . (108 utf8) . (108 utf8) . (111 utf8) . (0x1F604 utf8) . "\n" } }