@@ -57,14 +57,13 @@ internalImports name =
5757 , include "_L" "N.List"
5858 , include "_E" "N.Error"
5959 , include "_J" "N.JavaScript"
60− , varDecl "_str" (obj "_J.toString")
6160 , varDecl "$moduleName" (string name)
6261 ]
6362
6463literal lit =
6564 case lit of
6665 Chr c -> string [c]
67− Str s -> ref "_str" <| string s
66+ Str s -> string s
6867 IntNum n -> IntLit () n
6968 FloatNum n -> NumLit () n
7069 Boolean b -> BoolLit () b