elf
/
cons-lists
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Much better toString() operatin for cons lists.

This commit is contained in:
Elf M. Sternberg 2016-04-29 19:07:21 -07:00
parent 762e8a4393
commit 0d0430240d
1 changed files with 7 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/lists.coffee
View File

@ -18,17 +18,13 @@ ConsList = ->
writeable: false
Object.defineProperty list, 'toString',
value: ->
return '()' if this.length == 0
rs = if this.length == 2
if this[1].isList
if this[1].length == 1 then ""
else
' ' + this[1].toString()
else
' . ' + this[1].toString()
else
' ' + this[1].toString()
'(' + this[0] + rs + ')'
helper = (node) ->
return "" if node.length == 0
return node[0].toString() if node.length == 1
return node[0].toString() + " . " + node[1].toString() if not node[1].isList
return node[0].toString() if node[1].length == 0
return node[0].toString() + " " + helper(node[1])
'(' + helper(this) + ')'
configurable: false,
enumerable: false,
writeable: false