diff options
| author | Bruce Hill <bitbucket@bruce-hill.com> | 2018-09-18 17:40:32 -0700 |
|---|---|---|
| committer | Bruce Hill <bitbucket@bruce-hill.com> | 2018-09-18 17:40:49 -0700 |
| commit | 884368593d6b05546ea0f595ac53a954999b95b4 (patch) | |
| tree | 471697d653208676054f0b637f6e77cce67c604b /string2.moon | |
| parent | 790b73c52a00f8e308733d15d36327c500ae26bf (diff) | |
Added code for handling lua keywords in as_lua_id().
Diffstat (limited to 'string2.moon')
| -rw-r--r-- | string2.moon | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/string2.moon b/string2.moon index 426504c..27e7122 100644 --- a/string2.moon +++ b/string2.moon @@ -64,7 +64,8 @@ string2 = { else format("x%02X", byte(c)) -- Lua IDs can't start with numbers, so map "1" -> "_1", "_1" -> "__1", etc. str = gsub str, "^_*%d", "_%1" - if match str, "^_*[a-z]*$" + -- This pattern is guaranteed to match all keywords, but also matches some other stuff. + if match str, "^_*[abdefgilnortuw][aefhilnoru][acdefiklnoprstu]*$" for kw in *lua_keywords if match str, ("^_*"..kw) str = "_"..str @@ -73,7 +74,8 @@ string2 = { -- from_lua_id(as_lua_id(str)) == str, but behavior is unspecified for inputs that -- did not come from as_lua_id() from_lua_id: (str)-> - if match str, "^_+[a-z]*$" + -- This pattern is guaranteed to match all keywords, but also matches some other stuff. + if match str, "^_+[abdefgilnortuw][aefhilnoru][acdefiklnoprstu]*$" for kw in *lua_keywords if match str, ("^_+"..kw) str = str\sub(2,-1) |