mirror of
https://github.com/GaloisInc/macaw.git
synced 2024-11-26 09:22:20 +03:00
Prefix fresh names with macaw
Hopefully, this will avoid clashes with keywords.
This commit is contained in:
parent
36e6c8f7b9
commit
21ffae1ebe
@ -379,7 +379,7 @@ freshValue sym str w ty =
|
||||
|
||||
where
|
||||
symName x =
|
||||
case userSymbol x of
|
||||
case userSymbol ("macaw_" ++ x) of
|
||||
Left err -> crash [ "Invalid symbol name:", show x, show err ]
|
||||
Right a -> return a
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user