diff --git a/AsyncRattus.cabal b/AsyncRattus.cabal
--- a/AsyncRattus.cabal
+++ b/AsyncRattus.cabal
@@ -1,6 +1,6 @@
 cabal-version:       1.18
 name:                AsyncRattus
-version:             0.2
+version:             0.2.0.1
 category:            FRP
 synopsis:            An asynchronous modal FRP language
 description:
diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+# 0.2.0.1
+
+Fix bug in elaboration of delay, adv, select
+
 # 0.2
 
 Instead of marking individual function definitions as Async Rattus
diff --git a/src/AsyncRattus/Plugin/Transform.hs b/src/AsyncRattus/Plugin/Transform.hs
--- a/src/AsyncRattus/Plugin/Transform.hs
+++ b/src/AsyncRattus/Plugin/Transform.hs
@@ -107,8 +107,8 @@
     let firstPrimInfo = foldl (\acc (p, _) -> acc <|> p) primInfo transformed
     let alts' = map snd transformed
     return (Case expr b t alts', firstPrimInfo)
-transform' ctx (Cast e _) = transform' ctx e
-transform' ctx (Tick _ e) = transform' ctx e
+transform' ctx (Cast e c) = do (e' , p) <- transform' ctx e; return (Cast e' c, p)
+transform' ctx (Tick t e) = do (e' , p) <- transform' ctx e; return (Tick t e', p)
 transform' _ e = return (e, Nothing)
 
 constructClockExtractionCode :: PrimInfo -> CoreM CoreExpr