hsc3-cairo 0.13 → 0.14

raw patch · 3 files changed

+12/−14 lines, 3 filesdep −hcg-minusdep ~hoscdep ~hsc3

Dependencies removed: hcg-minus

Dependency ranges changed: hosc, hsc3

Files

• README +2/−2
• Sound/SC3/Cairo/Scope/Shell.hs +6/−7
• hsc3-cairo.cabal +4/−5

@@ -3,12 +3,12 @@  [haskell][hs] [supercollider][sc3] ([hsc3][hsc3]) [cairo][cairo] drawing -[hsc3]: http://rd.slavepianos.org/rd/?t=hsc3+[hsc3]: http://rd.slavepianos.org/?t=hsc3 [hs]: http://haskell.org/ [sc3]: http://audiosynth.com/ [cairo]: http://cairographics.org/ -© [rohan drape][rd], 2012, [gpl]+© [rohan drape][rd], 2012-2013, [gpl]  [rd]: http://rd.slavepianos.org/ [gpl]: http://gnu.org/copyleft/

@@ -1,13 +1,13 @@ -- | Shell module Sound.SC3.Cairo.Scope.Shell where -import Data.CG.Minus {- hcg-minus -}-import Data.IORef-import Data.List+import Data.IORef {- base -}+import Data.List {- base -}+import Data.Maybe {- base -} import Data.List.Split {- split -} import qualified Graphics.Rendering.Cairo as C {- cairo -} import qualified Graphics.UI.Gtk as G {- gtk -}-import qualified Graphics.UI.Gtk.Gdk.Events as E+import qualified Graphics.UI.Gtk.Gdk.Events as E {- gtk -} import Sound.OSC.FD {- hosc -} import Sound.SC3.FD {- hsc3 -} @@ -23,7 +23,7 @@                       ,sh_nf :: Int -- ^ Number of frames                       ,sh_b :: Int -- ^ Buffer ID                       ,sh_ix :: Int -- ^ Bus index-                      ,sh_data :: [[R]] -- ^ Signal data+                      ,sh_data :: [[Double]] -- ^ Signal data                       ,sh_bracket :: Bracket_F st                       ,sh_sc3 :: SC3_F st                       ,sh_render :: Render_F st@@ -65,7 +65,7 @@   send fd (b_getn b [(0,nf * nc)])   r <- waitDatum fd "/b_setn"   let d = case r of-            _:Int 0:Int _:xs -> map datum_real_err xs+            _:Int32 0:Int32 _:xs -> mapMaybe datum_floating xs             _ -> []   return (sh {sh_data = deinterleave nc d}) @@ -132,4 +132,3 @@  sh_default :: Int -> Render_F st -> Key_F st -> Shell st sh_default nc r k = Shell 3 nc 512 10 0 [] sh_bracket_nil sh_sc3_nil r k 15-

@@ -1,10 +1,10 @@ Name:              hsc3-cairo-Version:           0.13+Version:           0.14 Synopsis:          haskell supercollider cairo drawing Description:       haskell supercollider cairo drawing License:           GPL Category:          Sound-Copyright:         (c) Rohan Drape, 2012+Copyright:         (c) Rohan Drape, 2012-2013 Author:            Rohan Drape Maintainer:        rd@slavepianos.org Stability:         Experimental@@ -19,9 +19,8 @@   Build-Depends:   base == 4.*,                    cairo,                    gtk,-                   hcg-minus,-                   hosc == 0.13.*,-                   hsc3 == 0.13.*,+                   hosc == 0.14.*,+                   hsc3 == 0.14.*,                    split   GHC-Options:     -Wall -fwarn-tabs   Exposed-modules: Sound.SC3.Cairo.Scope.Shell