Undo excision of streaming
This commit is contained in:
+2
-2
@@ -12,7 +12,7 @@ import Control.Lens
|
||||
import Data.Aeson
|
||||
import Data.Aeson.TH
|
||||
import Geometry.Data
|
||||
import Streaming
|
||||
--import Streaming
|
||||
|
||||
|
||||
{-# INLINE shVfromList #-}
|
||||
@@ -45,7 +45,7 @@ pairToSV = uncurry ShapeV
|
||||
|
||||
makeLenses ''ShapeV
|
||||
makeLenses ''ShapeObj
|
||||
type Shape' = Stream (Of ShapeObj) IO ()
|
||||
--type Shape' = Stream (Of ShapeObj) IO ()
|
||||
|
||||
type Shape = [ShapeObj]
|
||||
|
||||
|
||||
Reference in New Issue
Block a user