mirror of https://github.com/voidlizard/hbs2
bf6 pm fix
This commit is contained in:
parent
6f9e360b33
commit
fa7cdc14d5
|
@ -1693,7 +1693,7 @@ internalEntries = do
|
|||
[SymbolVal "_", b] ->do
|
||||
if bf6TypeOfPred pred == bf6TypeOf b then pure b else pure nil
|
||||
|
||||
[a, b] | bf6TypeOfPred pred == bf6TypeOf b -> do
|
||||
[a@(Literal _ _), b] | bf6TypeOfPred pred == bf6TypeOf b -> do
|
||||
if a == b then pure b else pure nil
|
||||
|
||||
[a,b] -> do
|
||||
|
|
Loading…
Reference in New Issue