hsc3-dot 0.7 → 0.8
raw patch · 4 files changed
+21/−14 lines, 4 filesdep ~hsc3PVP ok
version bump matches the API change (PVP)
Dependency ranges changed: hsc3
API changes (from Hackage documentation)
Files
- Help/hsc3-dot.help.lhs +2/−2
- README +2/−2
- Sound/SC3/UGen/Dot.hs +7/−5
- hsc3-dot.cabal +10/−5
Help/hsc3-dot.help.lhs view
@@ -1,4 +1,4 @@-> import Sound.SC3+> import Sound.SC3.Monadic > import Sound.SC3.UGen.Dot Simple a-rate only graph.@@ -20,7 +20,7 @@ With control input -> let f = Control KR "freq" 440+> let f = control KR "freq" 440 > in draw (out 0 (sinOsc AR f 0 * 0.1)) With multiple channel expansion.
README view
@@ -4,10 +4,10 @@ graphs. The graph rendering is delegated to graphviz, which must be installed. - http://slavepianos.org/rd/+ http://slavepianos.org/rd/?t=hsc3-dot http://haskell.org/ http://audiosynth.com/ http://graphviz.org/ -(c) rohan drape, 2006-2009+(c) rohan drape, 2006-2010 gpl, http://gnu.org/copyleft/
Sound/SC3/UGen/Dot.hs view
@@ -58,13 +58,13 @@ label :: Node -> String label (NodeC n _) = "N_" ++ show n-label (NodeK n _ _ _ ) = "C_" ++ show n+label (NodeK n _ _ _ _) = "C_" ++ show n label (NodeU n _ _ _ _ _ _) = "U_" ++ show n label (NodeP n _ _) = "U_" ++ show n port_nid :: FromPort -> Int port_nid (C n) = n-port_nid (K n) = n+port_nid (K n _) = n port_nid (U n _) = n port_indx :: FromPort -> Int@@ -110,7 +110,9 @@ name n _ = n is_implicit_control :: Node -> Bool-is_implicit_control (NodeU x _ s _ _ _ _) = x == -1 && s == "Control"+is_implicit_control (NodeU x _ s _ _ _ _) =+ let cs = ["AudioControl", "Control", "TrigControl"]+ in x == -1 && s `elem` cs is_implicit_control _ = False dot_node_u :: Graph -> Node -> String@@ -138,11 +140,11 @@ draw_with :: UGen -> String -> IO () draw_with u v = do d <- getTemporaryDirectory- let f = d </> "hsc.dot"+ let f = d </> "hsc3.dot" bracket (openFile f WriteMode) hClose (flip hPutStr (dot u))- system $ v ++ " " ++ f+ system (v ++ " " ++ f) return () -- Read the environment variable @DOTVIEWER@, the default value is
hsc3-dot.cabal view
@@ -1,16 +1,16 @@ Name: hsc3-dot-Version: 0.7+Version: 0.8 Synopsis: haskell supercollider graph drawing Description: dot format graph generator for SuperCollider unit generator graphs constructed using hsc3. License: GPL Category: Sound-Copyright: (c) Rohan Drape, 2006-2009+Copyright: (c) Rohan Drape, 2006-2010 Author: Rohan Drape Maintainer: rd@slavepianos.org Stability: Experimental-Homepage: http://slavepianos.org/rd/f/890257/-Tested-With: GHC == 6.8.2+Homepage: http://slavepianos.org/rd/?t=hsc3-dot+Tested-With: GHC == 6.10.3 Build-Type: Simple Cabal-Version: >= 1.6 @@ -21,7 +21,12 @@ Build-Depends: base == 3.*, directory, filepath,- hsc3 == 0.7,+ hsc3 == 0.8, process GHC-Options: -Wall -fwarn-tabs Exposed-modules: Sound.SC3.UGen.Dot+++Source-Repository head+ Type: darcs+ Location: http://slavepianos.org/~rd/sw/hsc3-dot/