EXPERIMENT, DON'T MERGE: see if Read instance exercised by the test s…

…uite

gibbon-compiler/src/Gibbon/Common.hs

@@ -73,7 +73,7 @@ newtype Symbol = Symbol InternedString
   deriving (Eq, Ord, Show)
 
 instance Read Symbol where
-  readsPrec _ s = [(Symbol $ DI.intern s, "")]
+  readsPrec _ s = undefined -- TODO: fixme [(Symbol $ DI.intern s, "")]
 
 instance IsString Symbol where
   fromString = intern