     else if isTuple expression
       tupleCompile
     else if isSeq expression
-      seqCompile
+      seqOrMapCompile
     else if isCall expression
       callCompile
   if not compileFn


token_ = (string) ->
  (tokenize string)[0]

translateIr = (ctx, irAst) ->
  walkIr irAst, (ast) ->

        translation: symbol
        pattern: literalPattern ctx, symbol
      when 'string'
        type: toConstrained stringType
        translation: symbol
        pattern: literalPattern ctx, symbol
      else
