mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-20 00:22:51 -06:00
restore commented out code
This commit is contained in:
@@ -794,7 +794,7 @@ getOverload t q = EvalM $ \(Gl gr _) k mt d r msgs -> do
|
|||||||
go [] = return (Fail err msgs)
|
go [] = return (Fail err msgs)
|
||||||
go (tty:ttys) = do res <- k tty mt d r msgs
|
go (tty:ttys) = do res <- k tty mt d r msgs
|
||||||
case res of
|
case res of
|
||||||
Fail _ _ -> return res -- go ttys
|
Fail _ _ -> go ttys
|
||||||
Success r msgs -> return (Success r msgs)
|
Success r msgs -> return (Success r msgs)
|
||||||
|
|
||||||
in go ttys
|
in go ttys
|
||||||
|
|||||||
Reference in New Issue
Block a user