tomo/test/text.tm

func main():
	>> str := "Hello Amélie!"
	//! Testing strings like $str

	>> str:upper()
	= "HELLO AMÉLIE!"
	>> str:lower()
	= "hello amélie!"
	>> str:lower():title()
	= "Hello Amélie!"


	>> \UE9
	= "é"

	>> \U65\U301
	= "é"

	>> \UE9 == \U65\U301
	= yes

	>> amelie := "Am$(\UE9)lie"
	>> amelie:clusters()
	= ["A", "m", "é", "l", "i", "e"] : [Text]
	>> amelie:utf32_codepoints()
	= [65_i32, 109_i32, 101_i32, 769_i32, 108_i32, 105_i32, 101_i32] : [Int32]
	>> amelie:utf8_bytes()
	= [65_i8, 109_i8, 101_i8, -52_i8, -127_i8, 108_i8, 105_i8, 101_i8] : [Int8]

	>> amelie2 := "Am$(\U65\U301)lie"
	>> amelie2:clusters()
	= ["A", "m", "é", "l", "i", "e"] : [Text]
	>> amelie2:utf32_codepoints()
	= [65_i32, 109_i32, 101_i32, 769_i32, 108_i32, 105_i32, 101_i32] : [Int32]
	>> amelie2:utf8_bytes()
	= [65_i8, 109_i8, 101_i8, -52_i8, -127_i8, 108_i8, 105_i8, 101_i8] : [Int8]

	>> amelie:codepoint_names()
	= ["LATIN CAPITAL LETTER A", "LATIN SMALL LETTER M", "LATIN SMALL LETTER E", "COMBINING ACUTE ACCENT", "LATIN SMALL LETTER L", "LATIN SMALL LETTER I", "LATIN SMALL LETTER E"]
	>> amelie2:codepoint_names()
	= ["LATIN CAPITAL LETTER A", "LATIN SMALL LETTER M", "LATIN SMALL LETTER E", "COMBINING ACUTE ACCENT", "LATIN SMALL LETTER L", "LATIN SMALL LETTER I", "LATIN SMALL LETTER E"]

	>> "Hello":replace("e", "X")
	= "HXllo"

	>> "Hello":has("l")
	= yes
	>> "Hello":has("l[..end]")
	= no
	>> "Hello":has("[..start]l")
	= no

	>> "Hello":has("o")
	= yes
	>> "Hello":has("o[..end]")
	= yes
	>> "Hello":has("[..start]o")
	= no

	>> "Hello":has("H")
	= yes
	>> "Hello":has("H[..end]")
	= no
	>> "Hello":has("[..start]H")
	= yes

	>> "Hello":replace("l", "")
	= "Heo"
	>> "xxxx":replace("x", "")
	= ""
	>> "xxxx":replace("y", "")
	= "xxxx"
	>> "One two three four five six":replace("e ", "")
	= "Ontwo threfour fivsix"

	>> " one ":replace("[start][..space]", "")
	= "one "
	>> " one ":replace("[..space][end]", "")
	= " one"

	>> amelie:has(amelie2)


	>> multiline := "
		line one
		line two
	"
	= "line one\nline two"

	//! Interpolation tests:
	>> "A $(1+2)"
	= "A 3"
	>> 'A $(1+2)'
	= "A $(1+2)"
	>> `A $(1+2)`
	= "A 3"

	>> $"A $(1+2)"
	= "A 3"
	>> $$"A $(1+2)"
	= "A $(1+2)"
	>> $="A =(1+2)"
	= "A 3"
	>> $(one (nested) two $(1+2))
	= "one (nested) two 3"
Syntax tweak: use ':' for blocks 2024-04-28 11:58:55 -07:00			`func main():`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> str := "Hello Amélie!"`
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`//! Testing strings like $str`
Add `!!` statement for printing text 2024-07-04 13:23:05 -07:00
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> str:upper()`
			`= "HELLO AMÉLIE!"`
			`>> str:lower()`
			`= "hello amélie!"`
			`>> str:lower():title()`
			`= "Hello Amélie!"`
Fix up unicode escapes 2024-03-03 14:49:40 -08:00
Add `!!` statement for printing text 2024-07-04 13:23:05 -07:00
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> \UE9`
			`= "é"`
Unicode normalization for equality, hashing, tests, and printing 2024-03-03 16:12:53 -08:00
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> \U65\U301`
			`= "é"`
Unicode normalization for equality, hashing, tests, and printing 2024-03-03 16:12:53 -08:00
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> \UE9 == \U65\U301`
			`= yes`
Add methods for text:clusters(), text:codepoints(), text:bytes() 2024-03-03 16:40:01 -08:00
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`>> amelie := "Am$(\UE9)lie"`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> amelie:clusters()`
			`= ["A", "m", "é", "l", "i", "e"] : [Text]`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> amelie:utf32_codepoints()`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= [65_i32, 109_i32, 101_i32, 769_i32, 108_i32, 105_i32, 101_i32] : [Int32]`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> amelie:utf8_bytes()`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= [65_i8, 109_i8, 101_i8, -52_i8, -127_i8, 108_i8, 105_i8, 101_i8] : [Int8]`
Fix some bugs relating to NUL termination of strings 2024-03-03 22:34:12 -08:00
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`>> amelie2 := "Am$(\U65\U301)lie"`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> amelie2:clusters()`
			`= ["A", "m", "é", "l", "i", "e"] : [Text]`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> amelie2:utf32_codepoints()`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= [65_i32, 109_i32, 101_i32, 769_i32, 108_i32, 105_i32, 101_i32] : [Int32]`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> amelie2:utf8_bytes()`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= [65_i8, 109_i8, 101_i8, -52_i8, -127_i8, 108_i8, 105_i8, 101_i8] : [Int8]`
Fixing string methods 2024-09-02 17:22:13 -07:00
			`>> amelie:codepoint_names()`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= ["LATIN CAPITAL LETTER A", "LATIN SMALL LETTER M", "LATIN SMALL LETTER E", "COMBINING ACUTE ACCENT", "LATIN SMALL LETTER L", "LATIN SMALL LETTER I", "LATIN SMALL LETTER E"]`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> amelie2:codepoint_names()`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= ["LATIN CAPITAL LETTER A", "LATIN SMALL LETTER M", "LATIN SMALL LETTER E", "COMBINING ACUTE ACCENT", "LATIN SMALL LETTER L", "LATIN SMALL LETTER I", "LATIN SMALL LETTER E"]`
Add langs to the language 2024-03-09 15:22:12 -08:00
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> "Hello":replace("e", "X")`
			`= "HXllo"`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00
			`>> "Hello":has("l")`
			`= yes`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "Hello":has("l[..end]")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= no`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "Hello":has("[..start]l")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= no`

			`>> "Hello":has("o")`
			`= yes`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "Hello":has("o[..end]")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= yes`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "Hello":has("[..start]o")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= no`

			`>> "Hello":has("H")`
			`= yes`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "Hello":has("H[..end]")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= no`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "Hello":has("[..start]H")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= yes`

Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "Hello":replace("l", "")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= "Heo"`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "xxxx":replace("x", "")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= ""`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "xxxx":replace("y", "")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= "xxxx"`
Fixing string methods 2024-09-02 17:22:13 -07:00			`>> "One two three four five six":replace("e ", "")`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00			`= "Ontwo threfour fivsix"`

Fixing string methods 2024-09-02 17:22:13 -07:00			`>> " one ":replace("[start][..space]", "")`
			`= "one "`
			`>> " one ":replace("[..space][end]", "")`
			`= " one"`
Hook up Text.has(), Text.trimmed(), Text.without() 2024-05-20 12:19:31 -07:00
			`>> amelie:has(amelie2)`
Add multiline string literal test 2024-07-01 10:09:26 -07:00

			`>> multiline := "`
			`line one`
			`line two`
			`"`
			`= "line one\nline two"`

Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`//! Interpolation tests:`
			`>> "A $(1+2)"`
			`= "A 3"`
			`>> 'A $(1+2)'`
			`= "A $(1+2)"`
			>> `A $(1+2)`
			`= "A 3"`

			`>> $"A $(1+2)"`
			`= "A 3"`
			`>> $$"A $(1+2)"`
			`= "A $(1+2)"`
			`>> $="A =(1+2)"`
			`= "A 3"`
			`>> $(one (nested) two $(1+2))`
			`= "one (nested) two 3"`