From a99d9476bc725f79c82e0569c2ebce7afea2a498 Mon Sep 17 00:00:00 2001 From: Patrick Thomson Date: Tue, 21 Jan 2020 16:20:22 -0500 Subject: [PATCH] :note: Serializing.SExpression. --- src/Serializing/SExpression.hs | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/src/Serializing/SExpression.hs b/src/Serializing/SExpression.hs index 54993f9ec..40ad06f26 100644 --- a/src/Serializing/SExpression.hs +++ b/src/Serializing/SExpression.hs @@ -1,4 +1,8 @@ -{-# LANGUAGE FlexibleContexts, GADTs, OverloadedStrings, RankNTypes, ScopedTypeVariables #-} +{-# LANGUAGE FlexibleContexts #-} +{-# LANGUAGE GADTs #-} +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE RankNTypes #-} +{-# LANGUAGE ScopedTypeVariables #-} module Serializing.SExpression ( serializeSExpression , ToSExpression(..) @@ -9,9 +13,8 @@ import Analysis.ConstructorName import Data.ByteString.Builder import Data.Diff import Data.Edit +import Data.Functor.Foldable import Data.Term -import Prelude -import Prologue data Options = ByShow | ByConstructorName