Skip to content

Commit e2a5896

Browse files
committed
ES: bugfix in Transformations/Util
1 parent a915bcb commit e2a5896

File tree

1 file changed

+1
-0
lines changed
  • grin/src/Transformations/ExtendedSyntax

1 file changed

+1
-0
lines changed

grin/src/Transformations/ExtendedSyntax/Util.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -44,6 +44,7 @@ foldNameUseExpF f = \case
4444
SReturnF val -> foldNames f val
4545
SStoreF v -> f v
4646
SUpdateF p v -> f p <> f v
47+
SFetchF p -> f p
4748
_ -> mempty
4849

4950
data DefRole = FunName | FunParam | BindVar | AltVar

0 commit comments

Comments
 (0)