diff options
author | Albert Krewinkel <albert@zeitkraut.de> | 2017-08-13 17:48:43 +0200 |
---|---|---|
committer | Albert Krewinkel <albert@zeitkraut.de> | 2017-08-13 17:48:43 +0200 |
commit | 3d87e2080a27618e70edd1ff2d4160ff959732a6 (patch) | |
tree | 6e5e9132e005e76588c0aa83acfeab24511ba2d5 /src/Text/Pandoc/Lua/SharedInstances.hs | |
parent | 6e6cee454eab678b8ad3b15edcee6e07945157ba (diff) | |
download | pandoc-3d87e2080a27618e70edd1ff2d4160ff959732a6.tar.gz |
Delete Text.Pandoc.Lua.SharedInstances
Stack instances for common data types are now provides by hslua. The
instance for Either was useful only for a very specific case; the
function that was using the `ToLuaStack Either` instance was rewritten
to work without it.
Closes: #3805
Diffstat (limited to 'src/Text/Pandoc/Lua/SharedInstances.hs')
-rw-r--r-- | src/Text/Pandoc/Lua/SharedInstances.hs | 44 |
1 files changed, 0 insertions, 44 deletions
diff --git a/src/Text/Pandoc/Lua/SharedInstances.hs b/src/Text/Pandoc/Lua/SharedInstances.hs deleted file mode 100644 index e9e72c219..000000000 --- a/src/Text/Pandoc/Lua/SharedInstances.hs +++ /dev/null @@ -1,44 +0,0 @@ -{- -Copyright © 2012-2017 John MacFarlane <jgm@berkeley.edu> - 2017 Albert Krewinkel <tarleb+pandoc@moltkeplatz.de> - -This program is free software; you can redistribute it and/or modify -it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 2 of the License, or -(at your option) any later version. - -This program is distributed in the hope that it will be useful, -but WITHOUT ANY WARRANTY; without even the implied warranty of -MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -GNU General Public License for more details. - -You should have received a copy of the GNU General Public License -along with this program; if not, write to the Free Software -Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA --} -{-# LANGUAGE CPP #-} -{-# LANGUAGE FlexibleInstances #-} -{-# LANGUAGE LambdaCase #-} -#if !MIN_VERSION_base(4,8,0) -{-# LANGUAGE OverlappingInstances #-} -#endif -{-# OPTIONS_GHC -fno-warn-orphans #-} -{- | - Module : Text.Pandoc.Lua.SharedInstances - Copyright : © 2012–2016 John MacFarlane, - © 2017 Albert Krewinkel - License : GNU GPL, version 2 or above - - Maintainer : Albert Krewinkel <tarleb+pandoc@moltkeplatz.de> - Stability : alpha - -Shared StackValue instances for pandoc and generic types. --} -module Text.Pandoc.Lua.SharedInstances () where - -import Foreign.Lua (ToLuaStack (push)) - -instance (ToLuaStack a, ToLuaStack b) => ToLuaStack (Either a b) where - push = \case - Left x -> push x - Right x -> push x |