                 else
                   throw new Error "#{names.join ', '} used but not defined"
             escapedName
+
+# Recognizing arrays, tuples and map literals
 
 isList = (node) ->
   Array.isArray(node) and node[0].token is '['

    result = fn result
  result

syntaxedTop = (source) ->
  collapse inside toHtml typifyTop astize tokenize "(#{source})"


      "var #{identifier} = exports['#{identifier}'] = #{compileImpl def};"
  else
    compileDef [name, def]

# Actual compilation of s-expressions starts here

compileImpl = (node, hoistableWheres = []) ->
  # For now special case match to allow definition hoisting up one level
