Export JSON show and Eq

src/Parser/JSON.md

@@ -55,6 +55,7 @@ data JSONValue : JSONType -> Type where
 ```
 
 ```idris hide
+export
 Show (JSONValue t) where
   show (VObject xs) = 
     let xs = dMap (\_,(key, value) => "\"\{key}\":\{show value}") xs
@@ -69,6 +70,7 @@ Show (JSONValue t) where
   show VNull = "null"
 
 -- TODO: Deal with keys potentially having different orders in different objects
+export
 Eq (JSONValue t) where
   (VObject xs) == (VObject ys) = 
     assert_total $ xs $== ys