diff --git a/Sound/Tidal/Dirt.hs b/Sound/Tidal/Dirt.hs
--- a/Sound/Tidal/Dirt.hs
+++ b/Sound/Tidal/Dirt.hs
@@ -101,6 +101,8 @@
 accellerate  = makeF dirt "accellerate"
 shape        = makeF dirt "shape"
 gain         = makeF dirt "gain"
+
+cutgroup :: Pattern Int -> OscPattern
 cutgroup     = makeI dirt "cutgroup"
 
 ksymbol      = makeF kriole "ksymbol"
diff --git a/Sound/Tidal/Stream.hs b/Sound/Tidal/Stream.hs
--- a/Sound/Tidal/Stream.hs
+++ b/Sound/Tidal/Stream.hs
@@ -156,8 +156,7 @@
 
 makeS = make string
 makeF = make float
-
-makeI = make (int32 . fromIntegral)
+makeI = make int32
 
 param :: OscShape -> String -> Param
 param shape n = head $ filter (\x -> name x == n) (params shape)
diff --git a/tidal.cabal b/tidal.cabal
--- a/tidal.cabal
+++ b/tidal.cabal
@@ -1,5 +1,5 @@
 name:                tidal
-version:             0.2.10
+version:             0.2.11
 synopsis:            Pattern language for improvised music
 -- description:         
 homepage:            http://yaxu.org/tidal/