tomo/test/lang.tm

lang HTML:
	HEADER := $HTML"<!DOCTYPE HTML>"
	func escape(t:Text)->HTML:
		t = t:replace_all({
			$/&/: "&amp;",
			$/</: "&lt;",
			$/>/: "&gt;",
			$/"/: "&quot",
			$/'/: "&#39;",
		})

		return HTML.from_unsafe_text(t)

	func escape_int(i:Int)->HTML:
		return HTML.from_unsafe_text("$i")
	
	func paragraph(content:HTML)->HTML:
		return $HTML"<p>$content</p>"

func main():
	>> HTML.HEADER
	= $HTML"<!DOCTYPE HTML>"

	>> HTML.HEADER.text_content
	= "<!DOCTYPE HTML>"

	>> user := "I <3 hax"
	>> html := $HTML"Hello $user!"
	= $HTML"Hello I &lt;3 hax!"
	>> html ++ $HTML"<br>"
	= $HTML"Hello I &lt;3 hax!<br>"

	>> $HTML"$(1 + 2)"
	= $HTML"3"

	>> $HTML"$(3_i8)"
	= $HTML"3"

	>> html:paragraph()
	= $HTML"<p>Hello I &lt;3 hax!</p>"

	>> Text(html)
	= "$HTML\"Hello I &lt;3 hax!\""
Syntax tweak: use ':' for blocks 2024-04-28 11:58:55 -07:00			`lang HTML:`
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`HEADER := $HTML"<!DOCTYPE HTML>"`
Syntax tweak: use ':' for blocks 2024-04-28 11:58:55 -07:00			`func escape(t:Text)->HTML:`
Add Text.replace_all({Pattern:Text}) and tweak API for replacement to support placeholders 2024-09-03 17:48:11 -07:00			`t = t:replace_all({`
			`$/&/: "&",`
			`$/</: "<",`
			`$/>/: ">",`
			`$/"/: "&quot",`
			`$/'/: "'",`
			`})`

Add lang tests 2024-03-09 16:03:35 -08:00			`return HTML.from_unsafe_text(t)`

Syntax tweak: use ':' for blocks 2024-04-28 11:58:55 -07:00			`func escape_int(i:Int)->HTML:`
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`return HTML.from_unsafe_text("$i")`
Add lang tests 2024-03-09 16:03:35 -08:00
Syntax tweak: use ':' for blocks 2024-04-28 11:58:55 -07:00			`func paragraph(content:HTML)->HTML:`
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`return $HTML"<p>$content</p>"`
Add lang tests 2024-03-09 16:03:35 -08:00
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			`>> HTML.HEADER`
			`= $HTML"<!DOCTYPE HTML>"`
Add lang tests 2024-03-09 16:03:35 -08:00
Add .text_content as a field on DSLs instead of a method 2024-08-19 11:29:58 -07:00			`>> HTML.HEADER.text_content`
			`= "<!DOCTYPE HTML>"`

Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> user := "I <3 hax"`
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`>> html := $HTML"Hello $user!"`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= $HTML"Hello I <3 hax!"`
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`>> html ++ $HTML"<br>"`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= $HTML"Hello I <3 hax!<br>"`
Add lang tests 2024-03-09 16:03:35 -08:00
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`>> $HTML"$(1 + 2)"`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= $HTML"3"`
Add lang tests 2024-03-09 16:03:35 -08:00
Improved syntax for dollar-string literals 2024-08-18 11:44:15 -07:00			`>> $HTML"$(3_i8)"`
Introducing the main() function 2024-04-12 10:09:31 -07:00			`= $HTML"3"`
Add lang tests 2024-03-09 16:03:35 -08:00
Introducing the main() function 2024-04-12 10:09:31 -07:00			`>> html:paragraph()`
			`= $HTML"<p>Hello I <3 hax!</p>"`
Tweak test code 2024-08-18 09:52:53 -07:00
			`>> Text(html)`
			`= "$HTML\"Hello I <3 hax!\""`