@@ -1,9 +1,8 @@
1−{-# OPTIONS_GHC -Wall #-}
2{-# LANGUAGE OverloadedStrings #-}
1{-# LANGUAGE OverloadedStrings #-}
3{-# LANGUAGE QuasiQuotes #-}
2{-# LANGUAGE QuasiQuotes #-}
4module Generate.Functions (functions) where
3module Generate.Functions (functions) where
6−import qualified Data.ByteString.Builder as BS
5+import qualified Data.ByteString.Builder as B
7import Text.RawString.QQ (r)
6import Text.RawString.QQ (r)
@@ -11,7 +10,7 @@ import Text.RawString.QQ (r)
11-- FUNCTIONS
10-- FUNCTIONS
14−functions :: BS.Builder
13+functions :: B.Builder
15functions = [r|
14functions = [r|
17function F(arity, fun, wrapper) {
16function F(arity, fun, wrapper) {