1 files changed, 2 insertions, 2 deletions
diff --git a/src/compiler/GF/Grammar/Binary.hs b/src/compiler/GF/Grammar/Binary.hs
index 1bdadabd6..76c3796bc 100644
--- a/src/compiler/GF/Grammar/Binary.hs
+++ b/src/compiler/GF/Grammar/Binary.hs
@@ -37,11 +37,11 @@ instance Binary Ident where
                 then return identW
                 else return (identC (rawIdentC bs))
 
-instance Binary SourceGrammar where
+instance Binary Grammar where
   put = put . modules
   get = fmap mGrammar get
 
-instance Binary SourceModInfo where
+instance Binary ModuleInfo where
   put mi = do put (mtype mi,mstatus mi,mflags mi,mextend mi,mwith mi,mopens mi,mexdeps mi,msrc mi,mseqs mi,jments mi)
   get    = do (mtype,mstatus,mflags,mextend,mwith,mopens,med,msrc,mseqs,jments) <- get
               return (ModInfo mtype mstatus mflags mextend mwith mopens med msrc mseqs jments)