added an argument place to ResOverload for extended overloads

src-3.0/GF/Grammar/Grammar.hs

@@ -98,7 +98,7 @@ data Info =
  | ResValue (Perh (Type,Maybe Int))        -- ^ (/RES/) to mark parameter constructors for lookup
  | ResOper  (Perh Type) (Perh Term)        -- ^ (/RES/)
 
- | ResOverload [(Type,Term)]               -- ^ (/RES/)
+ | ResOverload [Term] [(Type,Term)]        -- ^ (/RES/)
 
 -- judgements in concrete syntax
  | CncCat  (Perh Type) (Perh Term) MPr     -- ^ (/CNC/) lindef ini'zed, 

src-3.0/GF/Grammar/Lookup.hs

@@ -116,7 +116,7 @@ lookupOverload gr m c = do
       ModMod mo -> do
         info <- lookupIdentInfo mo c
         case info of
-          ResOverload tysts -> 
+          ResOverload os tysts -> 
             return [(map snd args,(val,tr)) | 
                       (ty,tr) <- tysts, Ok (args,val) <- [typeFormCnc ty]]