diff --git a/src/Renamer/Renamer.hs b/src/Renamer/Renamer.hs
index e92e12f..1eee3f0 100644
--- a/src/Renamer/Renamer.hs
+++ b/src/Renamer/Renamer.hs
@@ -104,7 +104,7 @@ newName name = do
                          }
     pure name'
   where
-    mk (LIdent name) i = LIdent ("#" ++ show i ++ name)
+    mk (LIdent name) i = LIdent ("$" ++ show i ++ name)
 
 localNames :: MonadState Cxt m => m b -> m b
 localNames m = do