Generating for psc > 0.9.

Expected uncurry optimization to be applied with bundle tool.

Author: jutaro

WebGLRaw.js

@@ -5,7 +5,6 @@
 
   "use strict";
 
-
     exports.getContextAttributes_ = function ()
     {var res = gl.getContextAttributes();
      if (res === undefined){

WebGLRaw.purs

@@ -1,11 +1,10 @@
 -- Auto generated: don't change manually, use purescript-webgl-generator to modify!!
 module Graphics.WebGLRaw where
 
-import Control.Monad.Eff
-import Control.Monad.Eff.WebGL
-import Data.ArrayBuffer.Types
-import Data.TypedArray
 import Prelude
+import Control.Monad.Eff (Eff)
+import Control.Monad.Eff.WebGL (WebGl)
+import Data.ArrayBuffer.Types (Int32Array, Float32Array)
 
 
 type GLenum = Int

purescript-webgl-generator.cabal

@@ -8,14 +8,14 @@ maintainer: [email protected]
 category: Development
 author: Jürgen (Jutaro) Nicklisch-Franken
 data-dir: ""
- 
+
 executable purescript-webgl-generator
-    build-depends: transformers >=0.4.2.0 && <0.5,
-                   parsec >=3.1.7 && <3.2, base >=4.7 && <4.8, pretty >=1.1.1
+    build-depends: base         >= 4.9.0 && < 4.10,
+                    parsec       >= 3.1.11 && < 3.2,
+                    transformers >= 0.5.2 && < 0.6,
+                    pretty       >= 1.1.3 && < 1.2
     main-is: Main.hs
     buildable: True
     default-language: Haskell2010
     hs-source-dirs: src
     other-modules: IDL.AST IDL.Parser IDL.Printer
- 
- 

src/IDL/Printer.hs

@@ -37,11 +37,10 @@ ppPureScriptFFI idl =
         (["-- Auto generated: don't change manually, use purescript-webgl-generator to modify!!",
         "module Graphics.WebGLRaw where",
         "",
-        "import Control.Monad.Eff",
-        "import Control.Monad.Eff.WebGL",
-        "import Data.ArrayBuffer.Types",
-        "import Data.TypedArray",
         "import Prelude",
+        "import Control.Monad.Eff (Eff)",
+        "import Control.Monad.Eff.WebGL (WebGl)",
+        "import Data.ArrayBuffer.Types (Int32Array, Float32Array)",
         "",
         ""] ++ typedefs))