diff --git a/src/MiniJuvix/Syntax/Concrete/Lexer.hs b/src/MiniJuvix/Syntax/Concrete/Lexer.hs
index cb195a6a6..2af07268a 100644
--- a/src/MiniJuvix/Syntax/Concrete/Lexer.hs
+++ b/src/MiniJuvix/Syntax/Concrete/Lexer.hs
@@ -46,7 +46,7 @@ bareIdentifier = do
           cat == MathSymbol,
           cat == CurrencySymbol,
           cat == ModifierLetter,
-          c `elem` ("_'-*," :: String)
+          c `elem` ("_'-*,&" :: String)
         ]
       where
         cat = generalCategory c