1771 lines
50 KiB
Text
Generated
1771 lines
50 KiB
Text
Generated
';; A pretty-printer that outputs tables in Fennel syntax.' Comment.Single
|
|
'\n' Text.Whitespace
|
|
|
|
';; Loosely based on inspect.lua: http://github.com/kikito/inspect.lua' Comment.Single
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'view-quote' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'str' Name.Variable
|
|
']' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'.. ' Keyword
|
|
'"\\""' Literal.String
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
'str' Name.Variable
|
|
' ' Text.Whitespace
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"\\""' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\\\""' Literal.String
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'"\\""' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'local ' Keyword.Declaration
|
|
'short-control-char-escapes' Name.Variable
|
|
'\n ' Text.Whitespace
|
|
'{' Punctuation
|
|
'"\\a"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\a"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\b"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\b"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\f"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\f"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\n"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\n"' Literal.String
|
|
'\n ' Text.Whitespace
|
|
'"\\r"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\r"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\t"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\t"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\v"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\v"' Literal.String
|
|
'}' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'local ' Keyword.Declaration
|
|
'long-control-char-escapes' Name.Variable
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'long' Name.Variable
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
'}' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'for ' Keyword
|
|
'[' Punctuation
|
|
'i' Name.Variable
|
|
' ' Text.Whitespace
|
|
'0' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
'31' Literal.Number.Integer
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'ch' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'string.char' Name.Variable
|
|
' ' Text.Whitespace
|
|
'i' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'when ' Keyword
|
|
'(' Punctuation
|
|
'not ' Keyword
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'short-control-char-escapes' Name.Variable
|
|
' ' Text.Whitespace
|
|
'ch' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tset ' Keyword
|
|
'short-control-char-escapes' Name.Variable
|
|
' ' Text.Whitespace
|
|
'ch' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'.. ' Keyword
|
|
'"\\\\"' Literal.String
|
|
' ' Text.Whitespace
|
|
'i' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tset ' Keyword
|
|
'long' Name.Variable
|
|
' ' Text.Whitespace
|
|
'ch' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
'"\\\\%03d"' Literal.String
|
|
' ' Text.Whitespace
|
|
':format' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'i' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'long' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'escape' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'str' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'-> ' Keyword
|
|
'str' Name.Variable
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"\\\\"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"\\\\\\\\"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"(%c)%f[0-9]"' Literal.String
|
|
' ' Text.Whitespace
|
|
'long-control-char-escapes' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"%c"' Literal.String
|
|
' ' Text.Whitespace
|
|
'short-control-char-escapes' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'sequence-key?' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'k' Name.Variable
|
|
' ' Text.Whitespace
|
|
'len' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'and ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'(' Punctuation
|
|
'type ' Name.Builtin
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'"number"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'<= ' Keyword
|
|
'1' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'<= ' Keyword
|
|
'k' Name.Variable
|
|
' ' Text.Whitespace
|
|
'len' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'(' Punctuation
|
|
'math.floor' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'local ' Keyword.Declaration
|
|
'type-order' Name.Variable
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
':number' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
':boolean' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'2' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
':string' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'3' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
':table' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'4' Literal.Number.Integer
|
|
'\n ' Text.Whitespace
|
|
':function' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'5' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
':userdata' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'6' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
':thread' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'7' Literal.Number.Integer
|
|
'}' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'sort-keys' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'a' Name.Variable
|
|
' ' Text.Whitespace
|
|
'b' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'ta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'type ' Name.Builtin
|
|
'a' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'tb' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'type ' Name.Builtin
|
|
'b' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'(' Punctuation
|
|
'and ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'ta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'tb' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'ta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"string"' Literal.String
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'ta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"number"' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'< ' Keyword
|
|
'a' Name.Variable
|
|
' ' Text.Whitespace
|
|
'b' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'dta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'type-order' Name.Variable
|
|
' ' Text.Whitespace
|
|
'a' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'dtb' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'type-order' Name.Variable
|
|
' ' Text.Whitespace
|
|
'b' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'(' Punctuation
|
|
'and ' Keyword
|
|
'dta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'dtb' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'< ' Keyword
|
|
'dta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'dtb' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'dta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'true' Name.Constant
|
|
'\n ' Text.Whitespace
|
|
'dtb' Name.Variable
|
|
' ' Text.Whitespace
|
|
'false' Name.Constant
|
|
'\n ' Text.Whitespace
|
|
':else' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'< ' Keyword
|
|
'ta' Name.Variable
|
|
' ' Text.Whitespace
|
|
'tb' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'get-sequence-length' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
't' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'var ' Keyword.Declaration
|
|
'len' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'each ' Keyword
|
|
'[' Punctuation
|
|
'i' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'ipairs ' Name.Builtin
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'set ' Keyword
|
|
'len' Name.Variable
|
|
' ' Text.Whitespace
|
|
'i' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'len' Name.Variable
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'get-nonsequential-keys' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
't' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'keys' Name.Variable
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
'}' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'sequence-length' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'get-sequence-length' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'each ' Keyword
|
|
'[' Punctuation
|
|
'k' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'pairs ' Name.Builtin
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'when ' Keyword
|
|
'(' Punctuation
|
|
'not ' Keyword
|
|
'(' Punctuation
|
|
'sequence-key?' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
' ' Text.Whitespace
|
|
'sequence-length' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'table.insert' Name.Variable
|
|
' ' Text.Whitespace
|
|
'keys' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'table.sort' Name.Variable
|
|
' ' Text.Whitespace
|
|
'keys' Name.Variable
|
|
' ' Text.Whitespace
|
|
'sort-keys' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'values ' Keyword
|
|
'keys' Name.Variable
|
|
' ' Text.Whitespace
|
|
'sequence-length' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'count-table-appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'appearances' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'when ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'(' Punctuation
|
|
'type ' Name.Builtin
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'"table"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'(' Punctuation
|
|
'not ' Keyword
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'do ' Keyword
|
|
'(' Punctuation
|
|
'tset ' Keyword
|
|
'appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'each ' Keyword
|
|
'[' Punctuation
|
|
'k' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'pairs ' Name.Builtin
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'count-table-appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
' ' Text.Whitespace
|
|
'appearances' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'count-table-appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
' ' Text.Whitespace
|
|
'appearances' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tset ' Keyword
|
|
'appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'+ ' Keyword
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'0' Literal.Number.Integer
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'appearances' Name.Variable
|
|
')' Punctuation
|
|
'\n\n\x0c\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'var ' Keyword.Declaration
|
|
'put-value' Name.Variable
|
|
' ' Text.Whitespace
|
|
'nil' Name.Constant
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'; mutual recursion going on; defined below' Comment.Single
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'...' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'each ' Keyword
|
|
'[' Punctuation
|
|
'_' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'ipairs ' Name.Builtin
|
|
'[' Punctuation
|
|
'...' Name.Variable
|
|
']' Punctuation
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'table.insert' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self.buffer' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'tabify' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
']' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"\\n"' Literal.String
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
'self.indent' Name.Variable
|
|
' ' Text.Whitespace
|
|
':rep' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'self.level' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'already-visited?' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
']' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'not= ' Keyword
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'self.ids' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'nil' Name.Constant
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'get-id' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'var ' Keyword.Declaration
|
|
'id' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'self.ids' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'when ' Keyword
|
|
'(' Punctuation
|
|
'not ' Keyword
|
|
'id' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'tv' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'type ' Name.Builtin
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'set ' Keyword
|
|
'id' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'+ ' Keyword
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'self.max-ids' Name.Variable
|
|
' ' Text.Whitespace
|
|
'tv' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'0' Literal.Number.Integer
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tset ' Keyword
|
|
'self.max-ids' Name.Variable
|
|
' ' Text.Whitespace
|
|
'tv' Name.Variable
|
|
' ' Text.Whitespace
|
|
'id' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tset ' Keyword
|
|
'self.ids' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
' ' Text.Whitespace
|
|
'id' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tostring ' Name.Builtin
|
|
'id' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'put-sequential-table' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'len' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"["' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'set ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'+ ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'for ' Keyword
|
|
'[' Punctuation
|
|
'i' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
'len' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'when ' Keyword
|
|
'(' Punctuation
|
|
'< ' Keyword
|
|
'1' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
'i' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'+ ' Keyword
|
|
'1' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
'len' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'" "' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-value' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'i' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'set ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'- ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"]"' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'put-key' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'(' Punctuation
|
|
'and ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'(' Punctuation
|
|
'type ' Name.Builtin
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'"string"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
'k' Name.Variable
|
|
' ' Text.Whitespace
|
|
':find' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"^[-%w?\\\\^_!$%&*+./@:|<=>]+$"' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'":"' Literal.String
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-value' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'put-kv-table' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'ordered-keys' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"{"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'set ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'+ ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
';; first, output sorted nonsequential keys' Comment.Single
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'each ' Keyword
|
|
'[' Punctuation
|
|
'i' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'ipairs ' Name.Builtin
|
|
'ordered-keys' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'when ' Keyword
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'self.table-edges' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'not= ' Keyword
|
|
'i' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tabify' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-key' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'" "' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-value' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'k' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
';; next, output any sequential keys' Comment.Single
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'each ' Keyword
|
|
'[' Punctuation
|
|
'i' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'ipairs ' Name.Builtin
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tabify' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-key' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'i' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'" "' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-value' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'set ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'- ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'1' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'when ' Keyword
|
|
'self.table-edges' Name.Variable
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tabify' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"}"' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'put-table' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'metamethod' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'and ' Keyword
|
|
'self.metamethod?' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'-?> ' Keyword
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'getmetatable ' Name.Builtin
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
':__fennelview' Literal.String.Symbol
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'(' Punctuation
|
|
'and ' Keyword
|
|
'(' Punctuation
|
|
'already-visited?' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'self.detect-cycles?' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"#<table @"' Literal.String
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'get-id' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'">"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'>= ' Keyword
|
|
'self.level' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self.depth' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"{...}"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'metamethod' Name.Variable
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'metamethod' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self.fennelview' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':else' Literal.String.Symbol
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'(' Punctuation
|
|
'non-seq-keys' Name.Variable
|
|
' ' Text.Whitespace
|
|
'len' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'get-nonsequential-keys' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'id' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'get-id' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
';; fancy metatable stuff can result in self.appearances not including' Comment.Single
|
|
'\n ' Text.Whitespace
|
|
";; a table, so if it's not found, assume we haven't seen it; we can't" Comment.Single
|
|
'\n ' Text.Whitespace
|
|
';; do cycle detection in that case.' Comment.Single
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'when ' Keyword
|
|
'(' Punctuation
|
|
'and ' Keyword
|
|
'(' Punctuation
|
|
'< ' Keyword
|
|
'1' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'(' Punctuation
|
|
'. ' Keyword
|
|
'self.appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'0' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'self.detect-cycles?' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"@"' Literal.String
|
|
' ' Text.Whitespace
|
|
'id' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'(' Punctuation
|
|
'and ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'(' Punctuation
|
|
'length ' Keyword
|
|
'non-seq-keys' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'0' Literal.Number.Integer
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'(' Punctuation
|
|
'length ' Keyword
|
|
't' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'0' Literal.Number.Integer
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'self.empty-as-square' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"[]"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"{}"' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'(' Punctuation
|
|
'length ' Keyword
|
|
'non-seq-keys' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'0' Literal.Number.Integer
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-sequential-table' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'len' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':else' Literal.String.Symbol
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-kv-table' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
't' Name.Variable
|
|
' ' Text.Whitespace
|
|
'non-seq-keys' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'set ' Keyword
|
|
'put-value' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'[' Punctuation
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'tv' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'type ' Name.Builtin
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'tv' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"string"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'view-quote' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'escape' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'tv' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"number"' Literal.String
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'tv' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"boolean"' Literal.String
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'tv' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"nil"' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tostring ' Name.Builtin
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'tv' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"table"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-table' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':else' Literal.String.Symbol
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'puts' Name.Variable
|
|
' ' Text.Whitespace
|
|
'self' Name.Variable
|
|
' ' Text.Whitespace
|
|
'"#<"' Literal.String
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'tostring ' Name.Builtin
|
|
'v' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'">"' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n\x0c\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'one-line' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'str' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
";; save return value as local to ignore gsub's extra return value" Comment.Single
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'ret' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'-> ' Keyword
|
|
'str' Name.Variable
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"\\n"' Literal.String
|
|
' ' Text.Whitespace
|
|
'" "' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"%[ "' Literal.String
|
|
' ' Text.Whitespace
|
|
'"["' Literal.String
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'" %]"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"]"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"%{ "' Literal.String
|
|
' ' Text.Whitespace
|
|
'"{"' Literal.String
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'" %}"' Literal.String
|
|
' ' Text.Whitespace
|
|
'"}"' Literal.String
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'"%( "' Literal.String
|
|
' ' Text.Whitespace
|
|
'"("' Literal.String
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
': ' Keyword
|
|
':gsub' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'" %)"' Literal.String
|
|
' ' Text.Whitespace
|
|
'")"' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'ret' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n\n' Text.Whitespace
|
|
|
|
'(' Punctuation
|
|
'fn ' Keyword.Declaration
|
|
'fennelview' Name.Variable
|
|
' ' Text.Whitespace
|
|
'[' Punctuation
|
|
'x' Name.Variable
|
|
' ' Text.Whitespace
|
|
'options' Name.Variable
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'"Return a string representation of x.\n\nCan take an options table with these keys:\n* :one-line (boolean: default: false) keep the output string as a one-liner\n* :depth (number, default: 128) limit how many levels to go (default: 128)\n* :indent (string, default: \\" \\") use this string to indent each level\n* :detect-cycles? (boolean, default: true) don\'t try to traverse a looping table\n* :metamethod? (boolean: default: true) use the __fennelview metamethod if found\n* :table-edges (boolean: default: true) put {} table brackets on their own line\n* :empty-as-square (boolean: default: false) render empty tables as [], not {}\n\nThe __fennelview metamethod should take the table being serialized as its first\nargument and a function as its second arg which can be used on table elements to\ncontinue the fennelview process on them.\n"' Literal.String
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'options' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'options' Name.Variable
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
'}' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'inspector' Name.Variable
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
':appearances' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'count-table-appearances' Name.Variable
|
|
' ' Text.Whitespace
|
|
'x' Name.Variable
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
'}' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':depth' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'options.depth' Name.Variable
|
|
' ' Text.Whitespace
|
|
'128' Literal.Number.Integer
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':level' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'0' Literal.Number.Integer
|
|
' ' Text.Whitespace
|
|
':buffer' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
'}' Punctuation
|
|
' ' Text.Whitespace
|
|
':ids' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
'}' Punctuation
|
|
' ' Text.Whitespace
|
|
':max-ids' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'{' Punctuation
|
|
'}' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':indent' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'or ' Keyword
|
|
'options.indent' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'options.one-line' Name.Variable
|
|
' ' Text.Whitespace
|
|
'""' Literal.String
|
|
' ' Text.Whitespace
|
|
'" "' Literal.String
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':detect-cycles?' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'not ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'false' Name.Constant
|
|
' ' Text.Whitespace
|
|
'options.detect-cycles?' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':metamethod?' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'not ' Keyword
|
|
'(' Punctuation
|
|
'= ' Keyword
|
|
'false' Name.Constant
|
|
' ' Text.Whitespace
|
|
'options.metamethod?' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':fennelview' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'#' Punctuation
|
|
'(' Punctuation
|
|
'fennelview' Name.Variable
|
|
' ' Text.Whitespace
|
|
'$1' Name.Variable
|
|
' ' Text.Whitespace
|
|
'options' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':table-edges' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'not= ' Keyword
|
|
'options.table-edges' Name.Variable
|
|
' ' Text.Whitespace
|
|
'false' Name.Constant
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
':empty-as-square' Literal.String.Symbol
|
|
' ' Text.Whitespace
|
|
'options.empty-as-square' Name.Variable
|
|
'}' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'put-value' Name.Variable
|
|
' ' Text.Whitespace
|
|
'inspector' Name.Variable
|
|
' ' Text.Whitespace
|
|
'x' Name.Variable
|
|
')' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'let ' Keyword
|
|
'[' Punctuation
|
|
'str' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'table.concat' Name.Variable
|
|
' ' Text.Whitespace
|
|
'inspector.buffer' Name.Variable
|
|
')' Punctuation
|
|
']' Punctuation
|
|
'\n ' Text.Whitespace
|
|
'(' Punctuation
|
|
'if ' Keyword
|
|
'options.one-line' Name.Variable
|
|
' ' Text.Whitespace
|
|
'(' Punctuation
|
|
'one-line' Name.Variable
|
|
' ' Text.Whitespace
|
|
'str' Name.Variable
|
|
')' Punctuation
|
|
' ' Text.Whitespace
|
|
'str' Name.Variable
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
')' Punctuation
|
|
'\n' Text.Whitespace
|