Add with expressions to IBC files

This prevents the following error:

idris: src/Idris/IBC.hs:(1546,13)-(1652,44): Non-exhaustive patterns in case

src/Idris/IBC.hs

@@ -26,7 +26,7 @@ import Util.Zlib (decompressEither)
 
 
 ibcVersion :: Word8
-ibcVersion = 58
+ibcVersion = 59
 
 
 data IBCFile = IBCFile { ver :: Word8,
@@ -1650,6 +1650,10 @@ instance Binary PTerm where
                                    put x1
                 PNoImplicits x1 -> do putWord8 36
                                       put x1
+                PDisamb x1 x2 -> do putWord8 37
+                                    put x1
+                                    put x2
+
         get
           = do i <- getWord8
                case i of
@@ -1759,6 +1763,9 @@ instance Binary PTerm where
                             return (PUnifyLog x1)
                    36 -> do x1 <- get
                             return (PNoImplicits x1)
+                   37 -> do x1 <- get
+                            x2 <- get
+                            return (PDisamb x1 x2)
                    _ -> error "Corrupted binary data for PTerm"
 
 instance (Binary t) => Binary (PTactic' t) where