From 9b26957785e1418bbf66941acd3a8d858fca7fd3 Mon Sep 17 00:00:00 2001 From: aarne Date: Thu, 3 Mar 2011 15:10:31 +0000 Subject: [PATCH] overloaded opers included in sorting of judgements --- src/compiler/GF/Grammar/Macros.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/compiler/GF/Grammar/Macros.hs b/src/compiler/GF/Grammar/Macros.hs index fb9979c31..bdf1b5df4 100644 --- a/src/compiler/GF/Grammar/Macros.hs +++ b/src/compiler/GF/Grammar/Macros.hs @@ -621,7 +621,7 @@ allDependencies ism b = opty _ = [] pts i = case i of ResOper pty pt -> [pty,pt] ---- ResOverload _ tyts -> concat [[Just ty, Just tr] | (ty,tr) <- tyts] + ResOverload _ tyts -> concat [[Just ty, Just tr] | (ty,tr) <- tyts] ResParam (Just ps) _ -> [Just (L loc t) | L loc (_,cont) <- ps, (_,_,t) <- cont] CncCat pty _ _ -> [pty] CncFun _ pt _ -> [pt] ---- (Maybe (Ident,(Context,Type))