Skip to content

Commit 2674982

Browse files
authored
Merge pull request #5632 from StachuDotNet/fix-canonical-wildcard
Add missing LPWildcard case in Canonical.fs hashing
2 parents a64e82b + 9e8bd6e commit 2674982

File tree

1 file changed

+1
-0
lines changed

1 file changed

+1
-0
lines changed

backend/src/LibSerialization/Hashing/Canonical.fs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -185,6 +185,7 @@ let writeLetPattern (w : BinaryWriter) (pattern : PT.LetPattern) =
185185
writeLetPattern w first
186186
writeLetPattern w second
187187
Common.List.write w writeLetPattern rest
188+
| PT.LPWildcard _id -> w.Write 3uy
188189

189190

190191
let writeMatchPattern (w : BinaryWriter) (pattern : PT.MatchPattern) =

0 commit comments

Comments
 (0)