Bruce/nomsu
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added gsub.

Browse Source
This commit is contained in:
Bruce Hill 2017-11-01 15:58:19 -07:00
parent 8c7915e466
commit cbd876673a
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/utils.nom
View File

@ -22,6 +22,11 @@ parse [join %strs] as: join %strs with glue ""
compile [capitalize %str, %str capitalized] to: compile [capitalize %str, %str capitalized] to:
"(\(%str as lua)):gsub('%l', string.upper, 1)" "(\(%str as lua)):gsub('%l', string.upper, 1)"
compile [%str with %patt replaced with %sub, %str s/%patt/%sub] to:
"((\(%str as lua)):gsub(\(%patt as lua), \(%sub as lua)))"
compile [%str with %patt replaced with %sub %n times, %str s/%patt/%sub/%n] to:
"((\(%str as lua)):gsub(\(%patt as lua), \(%sub as lua), \(%n as lua)))"
compile [say %str] to: ".." compile [say %str] to: ".."
|nomsu:writeln(nomsu:stringify(\(%str as lua))) |nomsu:writeln(nomsu:stringify(\(%str as lua)))
@ -42,6 +47,7 @@ rule [random choice from %elements, random choice %elements, random %elements] =
=lua "\(%elements)[math.random(#\(%elements))]" =lua "\(%elements)[math.random(#\(%elements))]"
# Math functions # Math functions
compile [% as number] to: "tonumber(\(% as lua))"
compile [abs %, absolute value of %, | % |] to: "math.abs(\(% as lua))" compile [abs %, absolute value of %, | % |] to: "math.abs(\(% as lua))"
compile [sqrt %, square root of %] to: "math.sqrt(\(% as lua))" compile [sqrt %, square root of %] to: "math.sqrt(\(% as lua))"
compile [sin %, sine %] to: "math.sin(\(% as lua))" compile [sin %, sine %] to: "math.sin(\(% as lua))"