abraham levine
6 years ago
81 changed files with 93 additions and 2823 deletions
@ -0,0 +1,92 @@
|
||||
|
||||
# Created by https://www.gitignore.io/api/emacs,haskell |
||||
|
||||
### Emacs ### |
||||
# -*- mode: gitignore; -*- |
||||
*~ |
||||
\#*\# |
||||
/.emacs.desktop |
||||
/.emacs.desktop.lock |
||||
*.elc |
||||
auto-save-list |
||||
tramp |
||||
.\#* |
||||
|
||||
# Org-mode |
||||
.org-id-locations |
||||
*_archive |
||||
|
||||
# flymake-mode |
||||
*_flymake.* |
||||
|
||||
# eshell files |
||||
/eshell/history |
||||
/eshell/lastdir |
||||
|
||||
# elpa packages |
||||
/elpa/ |
||||
|
||||
# reftex files |
||||
*.rel |
||||
|
||||
# AUCTeX auto folder |
||||
/auto/ |
||||
|
||||
# cask packages |
||||
.cask/ |
||||
dist/ |
||||
|
||||
# Flycheck |
||||
flycheck_*.el |
||||
|
||||
# server auth directory |
||||
/server/ |
||||
|
||||
# projectiles files |
||||
.projectile |
||||
projectile-bookmarks.eld |
||||
|
||||
# directory configuration |
||||
.dir-locals.el |
||||
|
||||
# saveplace |
||||
places |
||||
|
||||
# url cache |
||||
url/cache/ |
||||
|
||||
# cedet |
||||
ede-projects.el |
||||
|
||||
# smex |
||||
smex-items |
||||
|
||||
# company-statistics |
||||
company-statistics-cache.el |
||||
|
||||
# anaconda-mode |
||||
anaconda-mode/ |
||||
|
||||
### Haskell ### |
||||
dist |
||||
dist-* |
||||
cabal-dev |
||||
*.o |
||||
*.hi |
||||
*.chi |
||||
*.chs.h |
||||
*.dyn_o |
||||
*.dyn_hi |
||||
.hpc |
||||
.hsenv |
||||
.cabal-sandbox/ |
||||
cabal.sandbox.config |
||||
*.prof |
||||
*.aux |
||||
*.hp |
||||
*.eventlog |
||||
.stack-work/ |
||||
cabal.project.local |
||||
.HTF/ |
||||
|
||||
# End of https://www.gitignore.io/api/emacs,haskell |
||||
@ -1,3 +1 @@
|
||||
# very-nice |
||||
|
||||
a scheme interpreter that interprets scheme |
||||
# very-nice2 |
||||
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1,50 +0,0 @@
|
||||
{-# LANGUAGE CPP #-} |
||||
{-# OPTIONS_GHC -fno-warn-missing-import-lists #-} |
||||
{-# OPTIONS_GHC -fno-warn-implicit-prelude #-} |
||||
module Paths_very_nice2 ( |
||||
version, |
||||
getBinDir, getLibDir, getDynLibDir, getDataDir, getLibexecDir, |
||||
getDataFileName, getSysconfDir |
||||
) where |
||||
|
||||
import qualified Control.Exception as Exception |
||||
import Data.Version (Version(..)) |
||||
import System.Environment (getEnv) |
||||
import Prelude |
||||
|
||||
#if defined(VERSION_base) |
||||
|
||||
#if MIN_VERSION_base(4,0,0) |
||||
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a |
||||
#else |
||||
catchIO :: IO a -> (Exception.Exception -> IO a) -> IO a |
||||
#endif |
||||
|
||||
#else |
||||
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a |
||||
#endif |
||||
catchIO = Exception.catch |
||||
|
||||
version :: Version |
||||
version = Version [0,1,0,0] [] |
||||
bindir, libdir, dynlibdir, datadir, libexecdir, sysconfdir :: FilePath |
||||
|
||||
bindir = "/home/ajl/src/very-nice/main/.stack-work/install/x86_64-linux/lts-9.3/8.0.2/bin" |
||||
libdir = "/home/ajl/src/very-nice/main/.stack-work/install/x86_64-linux/lts-9.3/8.0.2/lib/x86_64-linux-ghc-8.0.2/very-nice2-0.1.0.0-JVAQRNZycEHKkqLkDBpt2K" |
||||
dynlibdir = "/home/ajl/src/very-nice/main/.stack-work/install/x86_64-linux/lts-9.3/8.0.2/lib/x86_64-linux-ghc-8.0.2" |
||||
datadir = "/home/ajl/src/very-nice/main/.stack-work/install/x86_64-linux/lts-9.3/8.0.2/share/x86_64-linux-ghc-8.0.2/very-nice2-0.1.0.0" |
||||
libexecdir = "/home/ajl/src/very-nice/main/.stack-work/install/x86_64-linux/lts-9.3/8.0.2/libexec" |
||||
sysconfdir = "/home/ajl/src/very-nice/main/.stack-work/install/x86_64-linux/lts-9.3/8.0.2/etc" |
||||
|
||||
getBinDir, getLibDir, getDynLibDir, getDataDir, getLibexecDir, getSysconfDir :: IO FilePath |
||||
getBinDir = catchIO (getEnv "very_nice2_bindir") (\_ -> return bindir) |
||||
getLibDir = catchIO (getEnv "very_nice2_libdir") (\_ -> return libdir) |
||||
getDynLibDir = catchIO (getEnv "very_nice2_dynlibdir") (\_ -> return dynlibdir) |
||||
getDataDir = catchIO (getEnv "very_nice2_datadir") (\_ -> return datadir) |
||||
getLibexecDir = catchIO (getEnv "very_nice2_libexecdir") (\_ -> return libexecdir) |
||||
getSysconfDir = catchIO (getEnv "very_nice2_sysconfdir") (\_ -> return sysconfdir) |
||||
|
||||
getDataFileName :: FilePath -> IO FilePath |
||||
getDataFileName name = do |
||||
dir <- getDataDir |
||||
return (dir ++ "/" ++ name) |
||||
@ -1,125 +0,0 @@
|
||||
/* DO NOT EDIT: This file is automatically generated by Cabal */ |
||||
|
||||
/* package very-nice2-0.1.0.0 */ |
||||
#define VERSION_very_nice2 "0.1.0.0" |
||||
#define MIN_VERSION_very_nice2(major1,major2,minor) (\ |
||||
(major1) < 0 || \
|
||||
(major1) == 0 && (major2) < 1 || \
|
||||
(major1) == 0 && (major2) == 1 && (minor) <= 0) |
||||
|
||||
/* package base-4.9.1.0 */ |
||||
#define VERSION_base "4.9.1.0" |
||||
#define MIN_VERSION_base(major1,major2,minor) (\ |
||||
(major1) < 4 || \
|
||||
(major1) == 4 && (major2) < 9 || \
|
||||
(major1) == 4 && (major2) == 9 && (minor) <= 1) |
||||
|
||||
/* package mtl-2.2.1 */ |
||||
#define VERSION_mtl "2.2.1" |
||||
#define MIN_VERSION_mtl(major1,major2,minor) (\ |
||||
(major1) < 2 || \
|
||||
(major1) == 2 && (major2) < 2 || \
|
||||
(major1) == 2 && (major2) == 2 && (minor) <= 1) |
||||
|
||||
/* package parsec-3.1.11 */ |
||||
#define VERSION_parsec "3.1.11" |
||||
#define MIN_VERSION_parsec(major1,major2,minor) (\ |
||||
(major1) < 3 || \
|
||||
(major1) == 3 && (major2) < 1 || \
|
||||
(major1) == 3 && (major2) == 1 && (minor) <= 11) |
||||
|
||||
/* package text-1.2.2.2 */ |
||||
#define VERSION_text "1.2.2.2" |
||||
#define MIN_VERSION_text(major1,major2,minor) (\ |
||||
(major1) < 1 || \
|
||||
(major1) == 1 && (major2) < 2 || \
|
||||
(major1) == 1 && (major2) == 2 && (minor) <= 2) |
||||
|
||||
/* package vector-0.12.0.1 */ |
||||
#define VERSION_vector "0.12.0.1" |
||||
#define MIN_VERSION_vector(major1,major2,minor) (\ |
||||
(major1) < 0 || \
|
||||
(major1) == 0 && (major2) < 12 || \
|
||||
(major1) == 0 && (major2) == 12 && (minor) <= 0) |
||||
|
||||
/* tool alex-3.2.1 */ |
||||
#define TOOL_VERSION_alex "3.2.1" |
||||
#define MIN_TOOL_VERSION_alex(major1,major2,minor) (\ |
||||
(major1) < 3 || \
|
||||
(major1) == 3 && (major2) < 2 || \
|
||||
(major1) == 3 && (major2) == 2 && (minor) <= 1) |
||||
|
||||
/* tool cpphs-1.20.3 */ |
||||
#define TOOL_VERSION_cpphs "1.20.3" |
||||
#define MIN_TOOL_VERSION_cpphs(major1,major2,minor) (\ |
||||
(major1) < 1 || \
|
||||
(major1) == 1 && (major2) < 20 || \
|
||||
(major1) == 1 && (major2) == 20 && (minor) <= 3) |
||||
|
||||
/* tool gcc-5.4.0 */ |
||||
#define TOOL_VERSION_gcc "5.4.0" |
||||
#define MIN_TOOL_VERSION_gcc(major1,major2,minor) (\ |
||||
(major1) < 5 || \
|
||||
(major1) == 5 && (major2) < 4 || \
|
||||
(major1) == 5 && (major2) == 4 && (minor) <= 0) |
||||
|
||||
/* tool ghc-8.0.2 */ |
||||
#define TOOL_VERSION_ghc "8.0.2" |
||||
#define MIN_TOOL_VERSION_ghc(major1,major2,minor) (\ |
||||
(major1) < 8 || \
|
||||
(major1) == 8 && (major2) < 0 || \
|
||||
(major1) == 8 && (major2) == 0 && (minor) <= 2) |
||||
|
||||
/* tool ghc-pkg-8.0.2 */ |
||||
#define TOOL_VERSION_ghc_pkg "8.0.2" |
||||
#define MIN_TOOL_VERSION_ghc_pkg(major1,major2,minor) (\ |
||||
(major1) < 8 || \
|
||||
(major1) == 8 && (major2) < 0 || \
|
||||
(major1) == 8 && (major2) == 0 && (minor) <= 2) |
||||
|
||||
/* tool haddock-2.17.3 */ |
||||
#define TOOL_VERSION_haddock "2.17.3" |
||||
#define MIN_TOOL_VERSION_haddock(major1,major2,minor) (\ |
||||
(major1) < 2 || \
|
||||
(major1) == 2 && (major2) < 17 || \
|
||||
(major1) == 2 && (major2) == 17 && (minor) <= 3) |
||||
|
||||
/* tool happy-1.19.5 */ |
||||
#define TOOL_VERSION_happy "1.19.5" |
||||
#define MIN_TOOL_VERSION_happy(major1,major2,minor) (\ |
||||
(major1) < 1 || \
|
||||
(major1) == 1 && (major2) < 19 || \
|
||||
(major1) == 1 && (major2) == 19 && (minor) <= 5) |
||||
|
||||
/* tool hpc-0.67 */ |
||||
#define TOOL_VERSION_hpc "0.67" |
||||
#define MIN_TOOL_VERSION_hpc(major1,major2,minor) (\ |
||||
(major1) < 0 || \
|
||||
(major1) == 0 && (major2) < 67 || \
|
||||
(major1) == 0 && (major2) == 67 && (minor) <= 0) |
||||
|
||||
/* tool hsc2hs-0.68.1 */ |
||||
#define TOOL_VERSION_hsc2hs "0.68.1" |
||||
#define MIN_TOOL_VERSION_hsc2hs(major1,major2,minor) (\ |
||||
(major1) < 0 || \
|
||||
(major1) == 0 && (major2) < 68 || \
|
||||
(major1) == 0 && (major2) == 68 && (minor) <= 1) |
||||
|
||||
/* tool hscolour-1.24 */ |
||||
#define TOOL_VERSION_hscolour "1.24" |
||||
#define MIN_TOOL_VERSION_hscolour(major1,major2,minor) (\ |
||||
(major1) < 1 || \
|
||||
(major1) == 1 && (major2) < 24 || \
|
||||
(major1) == 1 && (major2) == 24 && (minor) <= 0) |
||||
|
||||
/* tool strip-2.28 */ |
||||
#define TOOL_VERSION_strip "2.28" |
||||
#define MIN_TOOL_VERSION_strip(major1,major2,minor) (\ |
||||
(major1) < 2 || \
|
||||
(major1) == 2 && (major2) < 28 || \
|
||||
(major1) == 2 && (major2) == 28 && (minor) <= 0) |
||||
|
||||
#define CURRENT_COMPONENT_ID "very-nice2-0.1.0.0-JVAQRNZycEHKkqLkDBpt2K" |
||||
|
||||
#define CURRENT_PACKAGE_KEY "very-nice2-0.1.0.0-JVAQRNZycEHKkqLkDBpt2K" |
||||
|
||||
Binary file not shown.
Binary file not shown.
@ -1,319 +0,0 @@
|
||||
|
||||
==================== FINAL INTERFACE ==================== |
||||
2017-10-12 18:30:22.306953756 UTC |
||||
|
||||
interface very-nice2-0.1.0.0-JVAQRNZycEHKkqLkDBpt2K:Scheme.Error 8002 |
||||
interface hash: 73d67d1ee2521d8de0d2ccfd93d0be61 |
||||
ABI hash: 547cde0ad178e9cdef27d0ca85feb123 |
||||
export-list hash: a8aa5bdaaa29a00c757f6182caccc68a |
||||
orphan hash: 693e9af84d3dfcc71e640e005bdc5e2e |
||||
flag hash: 403981d57c68e1b921ee0c33e9f402bc |
||||
sig of: Nothing |
||||
used TH splices: False |
||||
where |
||||
exports: |
||||
Scheme.Error.extractValue |
||||
Scheme.Error.trapError |
||||
Scheme.Error.LispError{Scheme.Error.BadSpecialForm Scheme.Error.Default Scheme.Error.NotFunction Scheme.Error.NumArgs Scheme.Error.Parser Scheme.Error.TypeMismatch Scheme.Error.UnboundVar} |
||||
Scheme.Error.ThrowsError |
||||
module dependencies: Scheme.LispVal Scheme.Parse |
||||
package dependencies: array-0.5.1.1@array-0.5.1.1 base-4.9.1.0 |
||||
binary-0.8.3.0@binary-0.8.3.0 |
||||
bytestring-0.10.8.1@bytestring-0.10.8.1 |
||||
containers-0.5.7.1@containers-0.5.7.1 |
||||
deepseq-1.4.2.0@deepseq-1.4.2.0 ghc-prim-0.5.0.0 |
||||
integer-gmp-1.0.0.1 mtl-2.2.1@mtl-2.2.1-BLKBelFsPB3BoFeSWSOYj6 |
||||
parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00 |
||||
transformers-0.5.2.0@transformers-0.5.2.0 |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ |
||||
orphans: base-4.9.1.0:GHC.Base base-4.9.1.0:GHC.Float |
||||
binary-0.8.3.0@binary-0.8.3.0:Data.Binary.Generic |
||||
bytestring-0.10.8.1@bytestring-0.10.8.1:Data.ByteString.Builder |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Lazy |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Show |
||||
transformers-0.5.2.0@transformers-0.5.2.0:Control.Monad.Trans.Error |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector.Fusion.Bundle |
||||
family instance modules: base-4.9.1.0:Control.Applicative |
||||
base-4.9.1.0:Data.Complex base-4.9.1.0:Data.Either |
||||
base-4.9.1.0:Data.Functor.Const base-4.9.1.0:Data.Functor.Identity |
||||
base-4.9.1.0:Data.List.NonEmpty base-4.9.1.0:Data.Monoid |
||||
base-4.9.1.0:Data.Semigroup base-4.9.1.0:Data.Type.Equality |
||||
base-4.9.1.0:Data.Version base-4.9.1.0:Data.Void |
||||
base-4.9.1.0:GHC.Exts base-4.9.1.0:GHC.Generics |
||||
base-4.9.1.0:GHC.IO.Exception base-4.9.1.0:GHC.TypeLits |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.IntMap.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.IntSet.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Map.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Sequence |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Set.Base |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh:Control.Monad.Primitive |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh:Data.Primitive.Array |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Lazy |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector |
||||
import -/ base-4.9.1.0:Data.Either 20b09ef8d0a5b74fdec011c40c1587f5 |
||||
import -/ base-4.9.1.0:GHC.Base c4231c43c07e46080a26bf94094c7aa1 |
||||
import -/ base-4.9.1.0:GHC.Show a027f5ac24879eaba752f44aa90fe511 |
||||
import -/ base-4.9.1.0:Prelude 22dd289b8469a8fa8dc81cab7b237771 |
||||
import -/ integer-gmp-1.0.0.1:GHC.Integer.Type 318df275d77dcdb18e0006d8d7870c2a |
||||
import -/ mtl-2.2.1@mtl-2.2.1-BLKBelFsPB3BoFeSWSOYj6:Control.Monad.Error f94fb0464a50f1963ce772827ab3e200 |
||||
import -/ mtl-2.2.1@mtl-2.2.1-BLKBelFsPB3BoFeSWSOYj6:Control.Monad.Error.Class 635294424a2da8269902789f5c8bbe99 |
||||
import -/ parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX:Text.Parsec.Error c39b2f8c987feda2c6bcb29752686ed7 |
||||
import -/ parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX:Text.ParserCombinators.Parsec.Error c9cf92441cb5377b8123c2d73d3a06bc |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text 28074c70d3351fb3368d27c0a438ae07 |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Internal 9bfcbbbe07ecef48f631025a838df7da |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Show 516b88f1e0e0dbed91cb925542602306 |
||||
import -/ transformers-0.5.2.0@transformers-0.5.2.0:Control.Monad.Trans.Error 159dc1eb6836e38a6a287381060be15d |
||||
import -/ Scheme.LispVal 46b64363eba4219a8339bd5306a4360f |
||||
exports: 844d3d3577cf0766f339ed033741201b |
||||
LispVal 33b6c02c47a7551a9184b99ae0083a3e |
||||
showVal 33b6c02c47a7551a9184b99ae0083a3e |
||||
import -/ Scheme.Parse de607dba7110befe46aff1639915edac |
||||
exports: b16c50c84baaf4c1af6941b998bae292 |
||||
652c0330a2c59188cf9ecf0a22c2ae69 |
||||
$fErrorLispError :: |
||||
Control.Monad.Trans.Error.Error Scheme.Error.LispError |
||||
DFunId |
||||
{- Strictness: m, Inline: [ALWAYS] CONLIKE, |
||||
Unfolding: DFun:. |
||||
@ Scheme.Error.LispError |
||||
Scheme.Error.$fErrorLispError_$cnoMsg |
||||
Scheme.Error.Default -} |
||||
5cfef3b98b8419f8e8523b2423917c79 |
||||
$fErrorLispError1 :: [GHC.Types.Char] |
||||
{- Unfolding: (GHC.CString.unpackCString# "Something happened"#) -} |
||||
652c0330a2c59188cf9ecf0a22c2ae69 |
||||
$fErrorLispError_$cnoMsg :: Scheme.Error.LispError |
||||
{- Strictness: m7, |
||||
Unfolding: (Scheme.Error.Default Scheme.Error.$fErrorLispError1) -} |
||||
652c0330a2c59188cf9ecf0a22c2ae69 |
||||
$fShowLispError :: GHC.Show.Show Scheme.Error.LispError |
||||
DFunId |
||||
{- Strictness: m, Inline: [ALWAYS] CONLIKE, |
||||
Unfolding: DFun:. |
||||
@ Scheme.Error.LispError |
||||
Scheme.Error.$fShowLispError_$cshowsPrec |
||||
Scheme.Error.$fShowLispError_$cshow |
||||
Scheme.Error.$fShowLispError_$cshowList -} |
||||
652c0330a2c59188cf9ecf0a22c2ae69 |
||||
$fShowLispError1 :: |
||||
Scheme.Error.LispError -> GHC.Base.String -> [GHC.Types.Char] |
||||
{- Arity: 2, |
||||
Unfolding: (\ (x :: Scheme.Error.LispError) |
||||
(s :: GHC.Base.String)[OneShot] -> |
||||
GHC.Base.++ |
||||
@ GHC.Types.Char |
||||
(Scheme.Error.$fShowLispError_$cshow x) |
||||
s) -} |
||||
652c0330a2c59188cf9ecf0a22c2ae69 |
||||
$fShowLispError_$cshow :: Scheme.Error.LispError -> GHC.Base.String |
||||
{- Arity: 1, Strictness: <S,1*U> -} |
||||
652c0330a2c59188cf9ecf0a22c2ae69 |
||||
$fShowLispError_$cshowList :: |
||||
[Scheme.Error.LispError] -> GHC.Show.ShowS |
||||
{- Arity: 2, Strictness: <S,1*U><L,U>, |
||||
Unfolding: (\ (ls :: [Scheme.Error.LispError]) |
||||
(s :: GHC.Base.String) -> |
||||
GHC.Show.showList__ |
||||
@ Scheme.Error.LispError |
||||
Scheme.Error.$fShowLispError1 |
||||
ls |
||||
s) -} |
||||
652c0330a2c59188cf9ecf0a22c2ae69 |
||||
$fShowLispError_$cshowsPrec :: |
||||
GHC.Types.Int -> Scheme.Error.LispError -> GHC.Show.ShowS |
||||
{- Arity: 3, Strictness: <L,A><S,1*U><L,1*U>, |
||||
Unfolding: InlineRule (3, True, False) |
||||
(\ (ds :: GHC.Types.Int) |
||||
(x :: Scheme.Error.LispError) |
||||
(s :: GHC.Base.String) -> |
||||
GHC.Base.augment |
||||
@ GHC.Types.Char |
||||
(\ @ b |
||||
(c :: GHC.Types.Char -> b -> b)[OneShot] |
||||
(n :: b)[OneShot] -> |
||||
GHC.Base.foldr |
||||
@ GHC.Types.Char |
||||
@ b |
||||
c |
||||
n |
||||
(Scheme.Error.$fShowLispError_$cshow x)) |
||||
s) -} |
||||
522e1c708203188412c4fb4d210b8f6e |
||||
$tc'BadSpecialForm :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
5055208255023276317## |
||||
6101065637503877023## |
||||
Scheme.Error.$trModule |
||||
Scheme.Error.$tc'BadSpecialForm1) -} |
||||
fa273375295e37ecf760fd71691123e8 |
||||
$tc'BadSpecialForm1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'BadSpecialForm"#) -} |
||||
182123139d86e1d5fa1b9b03be0aa382 |
||||
$tc'Default :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
8235057421028354565## |
||||
7003860365457634912## |
||||
Scheme.Error.$trModule |
||||
Scheme.Error.$tc'Default1) -} |
||||
093ad15e359eb5edb5595d3869dc2aa1 |
||||
$tc'Default1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Default"#) -} |
||||
4569d6070cb7dd426a2ac7bcfaebce18 |
||||
$tc'NotFunction :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
9082848236158817626## |
||||
1415897493701969117## |
||||
Scheme.Error.$trModule |
||||
Scheme.Error.$tc'NotFunction1) -} |
||||
58aab455d0e51a1f281e661d8e2311ad |
||||
$tc'NotFunction1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'NotFunction"#) -} |
||||
ef45e326123f22f70a7a564ebc497527 |
||||
$tc'NumArgs :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
29927254116367828## |
||||
3589918819309331788## |
||||
Scheme.Error.$trModule |
||||
Scheme.Error.$tc'NumArgs1) -} |
||||
49d7b7278e2de84ef0f2233c349dcf08 |
||||
$tc'NumArgs1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'NumArgs"#) -} |
||||
3cb6cefb04bfd52cd3bb134fbebb2461 |
||||
$tc'Parser :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
827487084871948320## |
||||
16988034692495772782## |
||||
Scheme.Error.$trModule |
||||
Scheme.Error.$tc'Parser1) -} |
||||
06f62e035e1a523dfd2bbc2b4a26bd70 |
||||
$tc'Parser1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Parser"#) -} |
||||
3a39ff03c0b34b2240ac64e9fdefb062 |
||||
$tc'TypeMismatch :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
745042912044617916## |
||||
2194054358719617188## |
||||
Scheme.Error.$trModule |
||||
Scheme.Error.$tc'TypeMismatch1) -} |
||||
d5c9d4dfac08cde1a06ba5274ac94b3e |
||||
$tc'TypeMismatch1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'TypeMismatch"#) -} |
||||
2c425d38db596bdcea0779459f392e9a |
||||
$tc'UnboundVar :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
18016936412725750018## |
||||
10749975033889558007## |
||||
Scheme.Error.$trModule |
||||
Scheme.Error.$tc'UnboundVar1) -} |
||||
03322afa092d0de1f9e77f67bfad5ed0 |
||||
$tc'UnboundVar1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'UnboundVar"#) -} |
||||
09ac25b326e6c8103f912ba6488ca3ae |
||||
$tcLispError :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
16455554712780276920## |
||||
8651102274302583932## |
||||
Scheme.Error.$trModule |
||||
Scheme.Error.$tcLispError1) -} |
||||
35477b8472bbaf2f0fd27644e42a0745 |
||||
$tcLispError1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "LispError"#) -} |
||||
045a988da00abf417873e5f2ab6c2628 |
||||
$trModule :: GHC.Types.Module |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.Module |
||||
Scheme.Error.$trModule2 |
||||
Scheme.Error.$trModule1) -} |
||||
82d95252d51002486c9423f0749cad94 |
||||
$trModule1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "Scheme.Error"#) -} |
||||
ea6ee64ea20c3b20c86633aad786b8cc |
||||
$trModule2 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS |
||||
"very-nice2-0.1.0.0-JVAQRNZycEHKkqLkDBpt2K"#) -} |
||||
652c0330a2c59188cf9ecf0a22c2ae69 |
||||
data LispError |
||||
= NumArgs GHC.Integer.Type.Integer [Scheme.LispVal.LispVal] |
||||
| TypeMismatch GHC.Base.String Scheme.LispVal.LispVal |
||||
| Parser Text.Parsec.Error.ParseError |
||||
| BadSpecialForm GHC.Base.String Scheme.LispVal.LispVal |
||||
| NotFunction GHC.Base.String GHC.Base.String |
||||
| UnboundVar GHC.Base.String GHC.Base.String |
||||
| Default GHC.Base.String |
||||
fd443aa4ca36502fb89b37dacf58ee39 |
||||
type ThrowsError = |
||||
Data.Either.Either Scheme.Error.LispError :: * -> * |
||||
85f53fa71739b8786e2b46d05573c78e |
||||
extractValue :: Scheme.Error.ThrowsError a -> a |
||||
{- Arity: 1, Strictness: <S,1*U>, |
||||
Unfolding: InlineRule (1, True, False) |
||||
(\ @ a (ds :: Data.Either.Either Scheme.Error.LispError a) -> |
||||
case ds of wild { |
||||
Data.Either.Left ipv -> Scheme.Error.extractValue1 @ a |
||||
Data.Either.Right val -> val }) -} |
||||
d139f2d13d30df20ce4422ce042b3619 |
||||
extractValue1 :: a |
||||
{- Strictness: x -} |
||||
0968a25e667a6e5c80b388d9e3bf1c83 |
||||
trapError :: |
||||
(GHC.Show.Show a, Control.Monad.Error.Class.MonadError a m) => |
||||
m GHC.Base.String -> m GHC.Base.String |
||||
{- Arity: 3, HasNoCafRefs, |
||||
Strictness: <L,1*U(A,1*U,A)><S(LLC(C(S))),U(1*U,A,1*C1(C1(U)))><L,U>, |
||||
Unfolding: (\ @ a |
||||
@ (m :: * -> *) |
||||
($dShow :: GHC.Show.Show a) |
||||
($dMonadError :: Control.Monad.Error.Class.MonadError a m) |
||||
(eta :: m GHC.Base.String) -> |
||||
Control.Monad.Error.Class.catchError |
||||
@ a |
||||
@ m |
||||
$dMonadError |
||||
@ GHC.Base.String |
||||
eta |
||||
(let { |
||||
f :: GHC.Base.Monad m |
||||
= Control.Monad.Error.Class.$p1MonadError @ a @ m $dMonadError |
||||
} in |
||||
let { |
||||
f1 :: GHC.Base.String -> m GHC.Base.String |
||||
= GHC.Base.return @ m f @ GHC.Base.String |
||||
} in |
||||
let { |
||||
g :: a -> GHC.Base.String = GHC.Show.show @ a $dShow |
||||
} in |
||||
\ (x :: a) -> f1 (g x))) -} |
||||
instance Control.Monad.Trans.Error.Error [Scheme.Error.LispError] |
||||
= Scheme.Error.$fErrorLispError |
||||
instance GHC.Show.Show [Scheme.Error.LispError] |
||||
= Scheme.Error.$fShowLispError |
||||
vectorised variables: |
||||
vectorised tycons: |
||||
vectorised reused tycons: |
||||
parallel variables: |
||||
parallel tycons: |
||||
trusted: none |
||||
require own pkg trusted: False |
||||
|
||||
@ -1,303 +0,0 @@
|
||||
|
||||
==================== FINAL INTERFACE ==================== |
||||
2017-10-05 19:04:11.009981673 UTC |
||||
|
||||
interface very-nice2-0.1.0.0-9bm9CwTPi3Zm1jHKX2NZO:Scheme.Eval [orphan module] 8002 |
||||
interface hash: 236bf1ef8223f4954db90f6e906d7b78 |
||||
ABI hash: d3c451d76696c28eb4042e98b7b1459b |
||||
export-list hash: 2f4e2f9ac06ca41645aa7658091c79a2 |
||||
orphan hash: df0fdc596e08c9aeb4016cbbb988c47e |
||||
flag hash: 403981d57c68e1b921ee0c33e9f402bc |
||||
sig of: Nothing |
||||
used TH splices: False |
||||
where |
||||
exports: |
||||
Scheme.Eval.eval |
||||
Scheme.Eval.showVal |
||||
module dependencies: Scheme.LispVal |
||||
package dependencies: array-0.5.1.1@array-0.5.1.1 base-4.9.1.0 |
||||
binary-0.8.3.0@binary-0.8.3.0 |
||||
bytestring-0.10.8.1@bytestring-0.10.8.1 |
||||
containers-0.5.7.1@containers-0.5.7.1 |
||||
deepseq-1.4.2.0@deepseq-1.4.2.0 ghc-prim-0.5.0.0 |
||||
integer-gmp-1.0.0.1 |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00 |
||||
transformers-0.5.2.0@transformers-0.5.2.0 |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ |
||||
orphans: base-4.9.1.0:GHC.Base base-4.9.1.0:GHC.Float |
||||
binary-0.8.3.0@binary-0.8.3.0:Data.Binary.Generic |
||||
bytestring-0.10.8.1@bytestring-0.10.8.1:Data.ByteString.Builder |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Show |
||||
transformers-0.5.2.0@transformers-0.5.2.0:Control.Monad.Trans.Error |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector.Fusion.Bundle |
||||
family instance modules: base-4.9.1.0:Control.Applicative |
||||
base-4.9.1.0:Data.Complex base-4.9.1.0:Data.Either |
||||
base-4.9.1.0:Data.Functor.Const base-4.9.1.0:Data.Functor.Identity |
||||
base-4.9.1.0:Data.List.NonEmpty base-4.9.1.0:Data.Monoid |
||||
base-4.9.1.0:Data.Semigroup base-4.9.1.0:Data.Type.Equality |
||||
base-4.9.1.0:Data.Version base-4.9.1.0:Data.Void |
||||
base-4.9.1.0:GHC.Exts base-4.9.1.0:GHC.Generics |
||||
base-4.9.1.0:GHC.IO.Exception base-4.9.1.0:GHC.TypeLits |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.IntMap.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.IntSet.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Map.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Sequence |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Set.Base |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh:Control.Monad.Primitive |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh:Data.Primitive.Array |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector |
||||
import -/ base-4.9.1.0:Data.Foldable 3e0b6967a1da89945d0e2d47266337a2 |
||||
import -/ base-4.9.1.0:Data.Maybe d876c4ffe4b3c43755a781e8ad860d88 |
||||
import -/ base-4.9.1.0:GHC.Base c4231c43c07e46080a26bf94094c7aa1 |
||||
import -/ base-4.9.1.0:GHC.List ab8c4e523e6c479c549d3bcd5fc4a439 |
||||
import -/ base-4.9.1.0:GHC.Num 00bfaa7b2f9d6084913c0697a8a49ec8 |
||||
import -/ base-4.9.1.0:GHC.Real 82e4e59051a13dba1da63e1e970a69e6 |
||||
import -/ base-4.9.1.0:GHC.Show a027f5ac24879eaba752f44aa90fe511 |
||||
import -/ base-4.9.1.0:Prelude 22dd289b8469a8fa8dc81cab7b237771 |
||||
import -/ integer-gmp-1.0.0.1:GHC.Integer.Type 318df275d77dcdb18e0006d8d7870c2a |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text 28074c70d3351fb3368d27c0a438ae07 |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Internal 9bfcbbbe07ecef48f631025a838df7da |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Show 516b88f1e0e0dbed91cb925542602306 |
||||
import -/ Scheme.LispVal 6fa885980ac59c5175b1f51ba54f65e9 |
||||
exports: a67bcd3dbdd40dd3564ccceab20058c1 |
||||
Atom f4650d1c21519cccc2f971d01d1adcf5 |
||||
Bool 1b1ff8b67c085a597d1988469cde6409 |
||||
Character 9877cdcb6e1063538abb106a29feb5a5 |
||||
Complex e3d47910114cd8289461e051ed4d7cd0 |
||||
DottedList 97122bd47427198e9111fbea94747a65 |
||||
Float 04bc2186c3b8a77529873e3fa666d01d |
||||
LispVal e2cc648633025257656004384e9ea9bd |
||||
List a4ca97f1a5ce0bdbdef23add69344f54 |
||||
Number a2bb760cde9b07aa4953e95d3629906a |
||||
Ratio 2ba1871eaf05838d08048ac82795f076 |
||||
String 0bc262469b13de691ca9cf3a1900bc0f |
||||
Vector 8c3e800ebcf0649e7628cb18b5a5fcf9 |
||||
7cb85cb79973ab14a43ab3196abcd3cc |
||||
$fShowLispVal :: GHC.Show.Show Scheme.LispVal.LispVal |
||||
DFunId |
||||
{- Strictness: m, Inline: [ALWAYS] CONLIKE, |
||||
Unfolding: DFun:. |
||||
@ Scheme.LispVal.LispVal |
||||
Scheme.Eval.$fShowLispVal_$cshowsPrec |
||||
Scheme.Eval.$fShowLispVal_$cshow |
||||
Scheme.Eval.$fShowLispVal_$cshowList -} |
||||
a5e33bdda42c075e50162568b98113c3 |
||||
$fShowLispVal1 :: |
||||
Scheme.LispVal.LispVal -> GHC.Base.String -> [GHC.Types.Char] |
||||
{- Arity: 2, |
||||
Unfolding: (\ (x :: Scheme.LispVal.LispVal) |
||||
(s :: GHC.Base.String)[OneShot] -> |
||||
case Scheme.Eval.showVal |
||||
x of wild { Data.Text.Internal.Text dt dt1 dt2 -> |
||||
let { |
||||
end :: GHC.Prim.Int# = GHC.Prim.+# dt1 dt2 |
||||
} in |
||||
letrec { |
||||
$wunfold :: GHC.Prim.Int# -> [GHC.Types.Char] |
||||
{- Arity: 1, Strictness: <S,U>, Inline: [0] -} |
||||
= \ (ww :: GHC.Prim.Int#) -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.>=# ww end) of wild1 { |
||||
GHC.Types.False |
||||
-> case GHC.Prim.indexWord16Array# dt ww of r# { DEFAULT -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.geWord# r# 55296##) of wild2 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.leWord# r# 56319##) of wild3 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.indexWord16Array# |
||||
dt |
||||
(GHC.Prim.+# ww 1#) of r#1 { DEFAULT -> |
||||
GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# |
||||
(GHC.Prim.chr# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.uncheckedIShiftL# |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#) 55296#) |
||||
10#) |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#1) 56320#)) |
||||
65536#))) |
||||
($wunfold (GHC.Prim.+# ww 2#)) } } } } |
||||
GHC.Types.True -> GHC.Types.[] @ GHC.Types.Char } |
||||
} in |
||||
GHC.Base.++ @ GHC.Types.Char ($wunfold dt1) s }) -} |
||||
0a38e5f42c0073aa502766248356c463 |
||||
$fShowLispVal_$cshow :: Scheme.LispVal.LispVal -> GHC.Base.String |
||||
{- Arity: 1, Strictness: <S,1*U>, |
||||
Unfolding: (\ (x :: Scheme.LispVal.LispVal) -> |
||||
case Scheme.Eval.showVal |
||||
x of wild { Data.Text.Internal.Text dt dt1 dt2 -> |
||||
let { |
||||
end :: GHC.Prim.Int# = GHC.Prim.+# dt1 dt2 |
||||
} in |
||||
letrec { |
||||
$wunfold :: GHC.Prim.Int# -> [GHC.Types.Char] |
||||
{- Arity: 1, Strictness: <S,U>, Inline: [0] -} |
||||
= \ (ww :: GHC.Prim.Int#) -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.>=# ww end) of wild1 { |
||||
GHC.Types.False |
||||
-> case GHC.Prim.indexWord16Array# dt ww of r# { DEFAULT -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.geWord# r# 55296##) of wild2 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.leWord# r# 56319##) of wild3 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.indexWord16Array# |
||||
dt |
||||
(GHC.Prim.+# ww 1#) of r#1 { DEFAULT -> |
||||
GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# |
||||
(GHC.Prim.chr# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.uncheckedIShiftL# |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#) 55296#) |
||||
10#) |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#1) 56320#)) |
||||
65536#))) |
||||
($wunfold (GHC.Prim.+# ww 2#)) } } } } |
||||
GHC.Types.True -> GHC.Types.[] @ GHC.Types.Char } |
||||
} in |
||||
$wunfold dt1 }) -} |
||||
39a2dd67fe79c56265218259603f98ce |
||||
$fShowLispVal_$cshowList :: |
||||
[Scheme.LispVal.LispVal] -> GHC.Show.ShowS |
||||
{- Arity: 2, Strictness: <S,1*U><L,U>, |
||||
Unfolding: (\ (ls :: [Scheme.LispVal.LispVal]) |
||||
(s :: GHC.Base.String) -> |
||||
GHC.Show.showList__ |
||||
@ Scheme.LispVal.LispVal |
||||
Scheme.Eval.$fShowLispVal1 |
||||
ls |
||||
s) -} |
||||
d0a17aa3843a34e18ca3f069f3ac3fc3 |
||||
$fShowLispVal_$cshowsPrec :: |
||||
GHC.Types.Int -> Scheme.LispVal.LispVal -> GHC.Show.ShowS |
||||
{- Arity: 3, Strictness: <L,A><S,1*U><L,1*U>, Inline: INLINE[0], |
||||
Unfolding: InlineRule (3, True, True) |
||||
(\ (w :: GHC.Types.Int) |
||||
(w1 :: Scheme.LispVal.LispVal) |
||||
(w2 :: GHC.Base.String) -> |
||||
Scheme.Eval.$w$cshowsPrec w1 w2) -} |
||||
bae9f471b9d2972a9f0a895b5e4c5483 |
||||
$trModule :: GHC.Types.Module |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.Module |
||||
Scheme.Eval.$trModule2 |
||||
Scheme.Eval.$trModule1) -} |
||||
a8bd968490866e49a7098ac472201d72 |
||||
$trModule1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "Scheme.Eval"#) -} |
||||
12cd08637fbdae28899a4942497039f1 |
||||
$trModule2 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS |
||||
"very-nice2-0.1.0.0-9bm9CwTPi3Zm1jHKX2NZO"#) -} |
||||
3e71bae59864cf6120a06ef245143cb9 |
||||
$w$cshowsPrec :: |
||||
Scheme.LispVal.LispVal -> GHC.Base.String -> [GHC.Types.Char] |
||||
{- Arity: 2, Strictness: <S,1*U><L,1*U>, Inline: [0], |
||||
Unfolding: (\ (w :: Scheme.LispVal.LispVal) |
||||
(w1 :: GHC.Base.String) -> |
||||
case Scheme.Eval.showVal |
||||
w of wild { Data.Text.Internal.Text dt dt1 dt2 -> |
||||
let { |
||||
end :: GHC.Prim.Int# = GHC.Prim.+# dt1 dt2 |
||||
} in |
||||
letrec { |
||||
$wunfold :: GHC.Prim.Int# -> [GHC.Types.Char] |
||||
{- Arity: 1, Strictness: <S,U>, Inline: [0] -} |
||||
= \ (ww :: GHC.Prim.Int#) -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.>=# ww end) of wild1 { |
||||
GHC.Types.False |
||||
-> case GHC.Prim.indexWord16Array# dt ww of r# { DEFAULT -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.geWord# r# 55296##) of wild2 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.leWord# r# 56319##) of wild3 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.indexWord16Array# |
||||
dt |
||||
(GHC.Prim.+# ww 1#) of r#1 { DEFAULT -> |
||||
GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# |
||||
(GHC.Prim.chr# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.uncheckedIShiftL# |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#) 55296#) |
||||
10#) |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#1) 56320#)) |
||||
65536#))) |
||||
($wunfold (GHC.Prim.+# ww 2#)) } } } } |
||||
GHC.Types.True -> GHC.Types.[] @ GHC.Types.Char } |
||||
} in |
||||
GHC.Base.++ @ GHC.Types.Char ($wunfold dt1) w1 }) -} |
||||
0fa646e57fef767709755c79b2657832 |
||||
eval :: Scheme.LispVal.LispVal -> Scheme.LispVal.LispVal |
||||
{- Arity: 1, Strictness: <S,1*U> -} |
||||
2929cd07045c170f308b974da5b108a4 |
||||
showVal :: Scheme.LispVal.LispVal -> Data.Text.Internal.Text |
||||
{- Arity: 1, Strictness: <S,1*U> -} |
||||
instance GHC.Show.Show [Scheme.LispVal.LispVal] |
||||
= Scheme.Eval.$fShowLispVal |
||||
vectorised variables: |
||||
vectorised tycons: |
||||
vectorised reused tycons: |
||||
parallel variables: |
||||
parallel tycons: |
||||
trusted: none |
||||
require own pkg trusted: False |
||||
|
||||
@ -1,442 +0,0 @@
|
||||
|
||||
==================== FINAL INTERFACE ==================== |
||||
2017-10-12 18:28:53.091173383 UTC |
||||
|
||||
interface very-nice2-0.1.0.0-JVAQRNZycEHKkqLkDBpt2K:Scheme.LispVal 8002 |
||||
interface hash: 396262c5527bad9b03730577a1f23a42 |
||||
ABI hash: 46b64363eba4219a8339bd5306a4360f |
||||
export-list hash: 844d3d3577cf0766f339ed033741201b |
||||
orphan hash: 693e9af84d3dfcc71e640e005bdc5e2e |
||||
flag hash: 403981d57c68e1b921ee0c33e9f402bc |
||||
sig of: Nothing |
||||
used TH splices: False |
||||
where |
||||
exports: |
||||
Scheme.LispVal.showVal |
||||
Scheme.LispVal.LispVal{Scheme.LispVal.Atom Scheme.LispVal.Bool Scheme.LispVal.Character Scheme.LispVal.Complex Scheme.LispVal.DottedList Scheme.LispVal.Float Scheme.LispVal.List Scheme.LispVal.Number Scheme.LispVal.Ratio Scheme.LispVal.String Scheme.LispVal.Vector} |
||||
module dependencies: |
||||
package dependencies: array-0.5.1.1@array-0.5.1.1 base-4.9.1.0 |
||||
binary-0.8.3.0@binary-0.8.3.0 |
||||
bytestring-0.10.8.1@bytestring-0.10.8.1 |
||||
containers-0.5.7.1@containers-0.5.7.1 |
||||
deepseq-1.4.2.0@deepseq-1.4.2.0 ghc-prim-0.5.0.0 |
||||
integer-gmp-1.0.0.1 |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00 |
||||
transformers-0.5.2.0@transformers-0.5.2.0 |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ |
||||
orphans: base-4.9.1.0:GHC.Base base-4.9.1.0:GHC.Float |
||||
binary-0.8.3.0@binary-0.8.3.0:Data.Binary.Generic |
||||
bytestring-0.10.8.1@bytestring-0.10.8.1:Data.ByteString.Builder |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Show |
||||
transformers-0.5.2.0@transformers-0.5.2.0:Control.Monad.Trans.Error |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector.Fusion.Bundle |
||||
family instance modules: base-4.9.1.0:Control.Applicative |
||||
base-4.9.1.0:Data.Complex base-4.9.1.0:Data.Either |
||||
base-4.9.1.0:Data.Functor.Const base-4.9.1.0:Data.Functor.Identity |
||||
base-4.9.1.0:Data.List.NonEmpty base-4.9.1.0:Data.Monoid |
||||
base-4.9.1.0:Data.Semigroup base-4.9.1.0:Data.Type.Equality |
||||
base-4.9.1.0:Data.Version base-4.9.1.0:Data.Void |
||||
base-4.9.1.0:GHC.Exts base-4.9.1.0:GHC.Generics |
||||
base-4.9.1.0:GHC.IO.Exception base-4.9.1.0:GHC.TypeLits |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.IntMap.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.IntSet.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Map.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Sequence |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Set.Base |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh:Control.Monad.Primitive |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh:Data.Primitive.Array |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector |
||||
import -/ base-4.9.1.0:Data.Complex ec864ed8b68bbdf9c6cffa700c3cfe8e |
||||
import -/ base-4.9.1.0:Data.Ratio 73e2d5dd51ef6c1a1767a580e2cd7459 |
||||
import -/ base-4.9.1.0:GHC.Base c4231c43c07e46080a26bf94094c7aa1 |
||||
import -/ base-4.9.1.0:GHC.Real 82e4e59051a13dba1da63e1e970a69e6 |
||||
import -/ base-4.9.1.0:GHC.Show a027f5ac24879eaba752f44aa90fe511 |
||||
import -/ base-4.9.1.0:Prelude 22dd289b8469a8fa8dc81cab7b237771 |
||||
import -/ integer-gmp-1.0.0.1:GHC.Integer.Type 318df275d77dcdb18e0006d8d7870c2a |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text 28074c70d3351fb3368d27c0a438ae07 |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Internal 9bfcbbbe07ecef48f631025a838df7da |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Show 516b88f1e0e0dbed91cb925542602306 |
||||
import -/ vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector 6714bbd22aa495e7dd4cf02a1891a465 |
||||
33b6c02c47a7551a9184b99ae0083a3e |
||||
$fShowLispVal :: GHC.Show.Show Scheme.LispVal.LispVal |
||||
DFunId |
||||
{- Strictness: m, Inline: [ALWAYS] CONLIKE, |
||||
Unfolding: DFun:. |
||||
@ Scheme.LispVal.LispVal |
||||
Scheme.LispVal.$fShowLispVal_$cshowsPrec |
||||
Scheme.LispVal.$fShowLispVal_$cshow |
||||
Scheme.LispVal.$fShowLispVal_$cshowList -} |
||||
33b6c02c47a7551a9184b99ae0083a3e |
||||
$fShowLispVal1 :: |
||||
Scheme.LispVal.LispVal -> GHC.Base.String -> [GHC.Types.Char] |
||||
{- Arity: 2, |
||||
Unfolding: (\ (x :: Scheme.LispVal.LispVal) |
||||
(s :: GHC.Base.String)[OneShot] -> |
||||
case Scheme.LispVal.showVal |
||||
x of wild { Data.Text.Internal.Text dt dt1 dt2 -> |
||||
let { |
||||
end :: GHC.Prim.Int# = GHC.Prim.+# dt1 dt2 |
||||
} in |
||||
letrec { |
||||
$wunfold :: GHC.Prim.Int# -> [GHC.Types.Char] |
||||
{- Arity: 1, Strictness: <S,U>, Inline: [0] -} |
||||
= \ (ww :: GHC.Prim.Int#) -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.>=# ww end) of wild1 { |
||||
GHC.Types.False |
||||
-> case GHC.Prim.indexWord16Array# dt ww of r# { DEFAULT -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.geWord# r# 55296##) of wild2 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.leWord# r# 56319##) of wild3 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.indexWord16Array# |
||||
dt |
||||
(GHC.Prim.+# ww 1#) of r#1 { DEFAULT -> |
||||
GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# |
||||
(GHC.Prim.chr# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.uncheckedIShiftL# |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#) 55296#) |
||||
10#) |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#1) 56320#)) |
||||
65536#))) |
||||
($wunfold (GHC.Prim.+# ww 2#)) } } } } |
||||
GHC.Types.True -> GHC.Types.[] @ GHC.Types.Char } |
||||
} in |
||||
GHC.Base.++ @ GHC.Types.Char ($wunfold dt1) s }) -} |
||||
33b6c02c47a7551a9184b99ae0083a3e |
||||
$fShowLispVal_$cshow :: Scheme.LispVal.LispVal -> GHC.Base.String |
||||
{- Arity: 1, Strictness: <S,1*U>, |
||||
Unfolding: (\ (x :: Scheme.LispVal.LispVal) -> |
||||
case Scheme.LispVal.showVal |
||||
x of wild { Data.Text.Internal.Text dt dt1 dt2 -> |
||||
let { |
||||
end :: GHC.Prim.Int# = GHC.Prim.+# dt1 dt2 |
||||
} in |
||||
letrec { |
||||
$wunfold :: GHC.Prim.Int# -> [GHC.Types.Char] |
||||
{- Arity: 1, Strictness: <S,U>, Inline: [0] -} |
||||
= \ (ww :: GHC.Prim.Int#) -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.>=# ww end) of wild1 { |
||||
GHC.Types.False |
||||
-> case GHC.Prim.indexWord16Array# dt ww of r# { DEFAULT -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.geWord# r# 55296##) of wild2 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.leWord# r# 56319##) of wild3 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.indexWord16Array# |
||||
dt |
||||
(GHC.Prim.+# ww 1#) of r#1 { DEFAULT -> |
||||
GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# |
||||
(GHC.Prim.chr# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.uncheckedIShiftL# |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#) 55296#) |
||||
10#) |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#1) 56320#)) |
||||
65536#))) |
||||
($wunfold (GHC.Prim.+# ww 2#)) } } } } |
||||
GHC.Types.True -> GHC.Types.[] @ GHC.Types.Char } |
||||
} in |
||||
$wunfold dt1 }) -} |
||||
33b6c02c47a7551a9184b99ae0083a3e |
||||
$fShowLispVal_$cshowList :: |
||||
[Scheme.LispVal.LispVal] -> GHC.Show.ShowS |
||||
{- Arity: 2, Strictness: <S,1*U><L,U>, |
||||
Unfolding: (\ (ls :: [Scheme.LispVal.LispVal]) |
||||
(s :: GHC.Base.String) -> |
||||
GHC.Show.showList__ |
||||
@ Scheme.LispVal.LispVal |
||||
Scheme.LispVal.$fShowLispVal1 |
||||
ls |
||||
s) -} |
||||
33b6c02c47a7551a9184b99ae0083a3e |
||||
$fShowLispVal_$cshowsPrec :: |
||||
GHC.Types.Int -> Scheme.LispVal.LispVal -> GHC.Show.ShowS |
||||
{- Arity: 3, Strictness: <L,A><S,1*U><L,1*U>, Inline: INLINE[0], |
||||
Unfolding: InlineRule (3, True, True) |
||||
(\ (w :: GHC.Types.Int) |
||||
(w1 :: Scheme.LispVal.LispVal) |
||||
(w2 :: GHC.Base.String) -> |
||||
Scheme.LispVal.$w$cshowsPrec w1 w2) -} |
||||
289a65ddc284a8613d98745a6e69d9ac |
||||
$tc'Atom :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
4944148236976644148## |
||||
14902068793828029410## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'Atom1) -} |
||||
c13b2a1c330ac72a94b37f29021b9e58 |
||||
$tc'Atom1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Atom"#) -} |
||||
2a060dadcc35eb3b1373e72c0d322676 |
||||
$tc'Bool :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
9154247724978603076## |
||||
3955301972730039769## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'Bool1) -} |
||||
6cd303911d94ab8f917ac34b1de59fdd |
||||
$tc'Bool1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Bool"#) -} |
||||
1ff075bae9411e70b83f9e738402935f |
||||
$tc'Character :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
16389745114808918344## |
||||
11628381186326919326## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'Character1) -} |
||||
336daca3ae27c74caab8e43feb06a7d3 |
||||
$tc'Character1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Character"#) -} |
||||
b089b887c69950eab206137c0311082d |
||||
$tc'Complex :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
416559203826743466## |
||||
12928069190669274767## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'Complex1) -} |
||||
2923ccb3e95c4f4b9bfb566a289a0c3f |
||||
$tc'Complex1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Complex"#) -} |
||||
162a563681d1a257b1af26b789d1f573 |
||||
$tc'DottedList :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
6133972038441856173## |
||||
4009106765258065621## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'DottedList1) -} |
||||
7fed9cfaa02bf728a2a7804d37f108c7 |
||||
$tc'DottedList1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'DottedList"#) -} |
||||
da538521c62e78f9fd419ad16124244f |
||||
$tc'Float :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
14424997199086803049## |
||||
3919359736590651881## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'Float1) -} |
||||
5ba664e9a4230bc8373455eaae005e45 |
||||
$tc'Float1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Float"#) -} |
||||
ee68a1cc2c7d3027c45093650d5469e7 |
||||
$tc'List :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
14530786425270821463## |
||||
1147704906125658977## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'List1) -} |
||||
f7efd1f90bd6f33d6617d9312c104405 |
||||
$tc'List1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'List"#) -} |
||||
21c0c7cd8b29dd416976bdb952a4534f |
||||
$tc'Number :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
5168705879273162740## |
||||
7764692833483248415## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'Number1) -} |
||||
ff73799aaeff9b46136412177f16c96a |
||||
$tc'Number1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Number"#) -} |
||||
19dfa44a13f09a3a3d0f3f6bd705ea38 |
||||
$tc'Ratio :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
7914478720033224490## |
||||
8041277300370047939## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'Ratio1) -} |
||||
039bed35c86074e5e5f93d85f0d5c8f9 |
||||
$tc'Ratio1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Ratio"#) -} |
||||
643dba2c87d1e51bca84b69675c641bf |
||||
$tc'String :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
6079610444748521978## |
||||
9408567090570078751## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'String1) -} |
||||
78c5f45a5ce5673f43e6a6a2bb3d19df |
||||
$tc'String1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'String"#) -} |
||||
fe562ef2f591cfe068778ab44d976c03 |
||||
$tc'Vector :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
3732714576768303851## |
||||
15423114779074467586## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tc'Vector1) -} |
||||
43bf44b9737cb1da19f1c88a9649dc72 |
||||
$tc'Vector1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "'Vector"#) -} |
||||
c07dbac916abfa084e9bd45203ca4b31 |
||||
$tcLispVal :: GHC.Types.TyCon |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.TyCon |
||||
3450165489885358394## |
||||
14203757452749961380## |
||||
Scheme.LispVal.$trModule |
||||
Scheme.LispVal.$tcLispVal1) -} |
||||
639232458175bf44a614ce4d79cf1b41 |
||||
$tcLispVal1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "LispVal"#) -} |
||||
5829c6f7ebcef5bfba0d4907b30c6b5e |
||||
$trModule :: GHC.Types.Module |
||||
{- HasNoCafRefs, Strictness: m, |
||||
Unfolding: (GHC.Types.Module |
||||
Scheme.LispVal.$trModule2 |
||||
Scheme.LispVal.$trModule1) -} |
||||
3aa4cc3a283e979da39935df1022d7aa |
||||
$trModule1 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS "Scheme.LispVal"#) -} |
||||
ea3e450cd0108201747d3b05974caab3 |
||||
$trModule2 :: GHC.Types.TrName |
||||
{- HasNoCafRefs, Strictness: m1, |
||||
Unfolding: (GHC.Types.TrNameS |
||||
"very-nice2-0.1.0.0-JVAQRNZycEHKkqLkDBpt2K"#) -} |
||||
33b6c02c47a7551a9184b99ae0083a3e |
||||
$w$cshowsPrec :: |
||||
Scheme.LispVal.LispVal -> GHC.Base.String -> [GHC.Types.Char] |
||||
{- Arity: 2, Strictness: <S,1*U><L,1*U>, Inline: [0], |
||||
Unfolding: (\ (w :: Scheme.LispVal.LispVal) |
||||
(w1 :: GHC.Base.String) -> |
||||
case Scheme.LispVal.showVal |
||||
w of wild { Data.Text.Internal.Text dt dt1 dt2 -> |
||||
let { |
||||
end :: GHC.Prim.Int# = GHC.Prim.+# dt1 dt2 |
||||
} in |
||||
letrec { |
||||
$wunfold :: GHC.Prim.Int# -> [GHC.Types.Char] |
||||
{- Arity: 1, Strictness: <S,U>, Inline: [0] -} |
||||
= \ (ww :: GHC.Prim.Int#) -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.>=# ww end) of wild1 { |
||||
GHC.Types.False |
||||
-> case GHC.Prim.indexWord16Array# dt ww of r# { DEFAULT -> |
||||
case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.geWord# r# 55296##) of wild2 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.tagToEnum# |
||||
@ GHC.Types.Bool |
||||
(GHC.Prim.leWord# r# 56319##) of wild3 { |
||||
GHC.Types.False |
||||
-> GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# (GHC.Prim.chr# (GHC.Prim.word2Int# r#))) |
||||
($wunfold (GHC.Prim.+# ww 1#)) |
||||
GHC.Types.True |
||||
-> case GHC.Prim.indexWord16Array# |
||||
dt |
||||
(GHC.Prim.+# ww 1#) of r#1 { DEFAULT -> |
||||
GHC.Types.: |
||||
@ GHC.Types.Char |
||||
(GHC.Types.C# |
||||
(GHC.Prim.chr# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.+# |
||||
(GHC.Prim.uncheckedIShiftL# |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#) 55296#) |
||||
10#) |
||||
(GHC.Prim.-# (GHC.Prim.word2Int# r#1) 56320#)) |
||||
65536#))) |
||||
($wunfold (GHC.Prim.+# ww 2#)) } } } } |
||||
GHC.Types.True -> GHC.Types.[] @ GHC.Types.Char } |
||||
} in |
||||
GHC.Base.++ @ GHC.Types.Char ($wunfold dt1) w1 }) -} |
||||
33b6c02c47a7551a9184b99ae0083a3e |
||||
data LispVal |
||||
= Atom Data.Text.Internal.Text |
||||
| List [Scheme.LispVal.LispVal] |
||||
| DottedList [Scheme.LispVal.LispVal] Scheme.LispVal.LispVal |
||||
| Vector (Data.Vector.Vector Scheme.LispVal.LispVal) |
||||
| Number GHC.Integer.Type.Integer |
||||
| Float GHC.Types.Double |
||||
| Ratio GHC.Real.Rational |
||||
| Complex (Data.Complex.Complex GHC.Types.Double) |
||||
| String Data.Text.Internal.Text |
||||
| Character GHC.Types.Char |
||||
| Bool GHC.Types.Bool |
||||
33b6c02c47a7551a9184b99ae0083a3e |
||||
showVal :: Scheme.LispVal.LispVal -> Data.Text.Internal.Text |
||||
{- Arity: 1, Strictness: <S,1*U> -} |
||||
instance GHC.Show.Show [Scheme.LispVal.LispVal] |
||||
= Scheme.LispVal.$fShowLispVal |
||||
vectorised variables: |
||||
vectorised tycons: |
||||
vectorised reused tycons: |
||||
parallel variables: |
||||
parallel tycons: |
||||
trusted: none |
||||
require own pkg trusted: False |
||||
|
||||
@ -1,832 +0,0 @@
|
||||
|
||||
==================== FINAL INTERFACE ==================== |
||||
2017-10-12 18:28:54.52649469 UTC |
||||
|
||||
interface very-nice2-0.1.0.0-JVAQRNZycEHKkqLkDBpt2K:Scheme.Parse 8002 |
||||
interface hash: 9fa843a4ad84006f32b6807c22977713 |
||||
ABI hash: de607dba7110befe46aff1639915edac |
||||
export-list hash: b16c50c84baaf4c1af6941b998bae292 |
||||
orphan hash: c10c2205bcbe16cd9cbc6de6c83efebc |
||||
flag hash: 403981d57c68e1b921ee0c33e9f402bc |
||||
sig of: Nothing |
||||
used TH splices: False |
||||
where |
||||
exports: |
||||
Scheme.Parse.parseString |
||||
Scheme.Parse.readExpr |
||||
module dependencies: Scheme.LispVal |
||||
package dependencies: array-0.5.1.1@array-0.5.1.1 base-4.9.1.0 |
||||
binary-0.8.3.0@binary-0.8.3.0 |
||||
bytestring-0.10.8.1@bytestring-0.10.8.1 |
||||
containers-0.5.7.1@containers-0.5.7.1 |
||||
deepseq-1.4.2.0@deepseq-1.4.2.0 ghc-prim-0.5.0.0 |
||||
integer-gmp-1.0.0.1 mtl-2.2.1@mtl-2.2.1-BLKBelFsPB3BoFeSWSOYj6 |
||||
parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00 |
||||
transformers-0.5.2.0@transformers-0.5.2.0 |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ |
||||
orphans: base-4.9.1.0:GHC.Base base-4.9.1.0:GHC.Float |
||||
binary-0.8.3.0@binary-0.8.3.0:Data.Binary.Generic |
||||
bytestring-0.10.8.1@bytestring-0.10.8.1:Data.ByteString.Builder |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Lazy |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Show |
||||
transformers-0.5.2.0@transformers-0.5.2.0:Control.Monad.Trans.Error |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector.Fusion.Bundle |
||||
family instance modules: base-4.9.1.0:Control.Applicative |
||||
base-4.9.1.0:Data.Complex base-4.9.1.0:Data.Either |
||||
base-4.9.1.0:Data.Functor.Const base-4.9.1.0:Data.Functor.Identity |
||||
base-4.9.1.0:Data.List.NonEmpty base-4.9.1.0:Data.Monoid |
||||
base-4.9.1.0:Data.Semigroup base-4.9.1.0:Data.Type.Equality |
||||
base-4.9.1.0:Data.Version base-4.9.1.0:Data.Void |
||||
base-4.9.1.0:GHC.Exts base-4.9.1.0:GHC.Generics |
||||
base-4.9.1.0:GHC.IO.Exception base-4.9.1.0:GHC.TypeLits |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.IntMap.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.IntSet.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Map.Base |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Sequence |
||||
containers-0.5.7.1@containers-0.5.7.1:Data.Set.Base |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh:Control.Monad.Primitive |
||||
primitive-0.6.2.0@primitive-0.6.2.0-4578caNkWQ54Gt1mxLF2Yh:Data.Primitive.Array |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text |
||||
text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Lazy |
||||
vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector |
||||
import -/ base-4.9.1.0:Data.Char 01433d23661edb6e5ef1536ef1e6774c |
||||
import -/ base-4.9.1.0:Data.Complex ec864ed8b68bbdf9c6cffa700c3cfe8e |
||||
import -/ base-4.9.1.0:Data.Either 20b09ef8d0a5b74fdec011c40c1587f5 |
||||
import -/ base-4.9.1.0:Data.Foldable 3e0b6967a1da89945d0e2d47266337a2 |
||||
import -/ base-4.9.1.0:Data.List 07ae2acca6538aa0800bd0a993ac6ac1 |
||||
import -/ base-4.9.1.0:Data.Ratio 73e2d5dd51ef6c1a1767a580e2cd7459 |
||||
import -/ base-4.9.1.0:Data.Traversable 556020d7cf3c4a34a774600512918a37 |
||||
import -/ base-4.9.1.0:Data.Tuple 7dc4bbb45d2e69c991ffac438beeca11 |
||||
import -/ base-4.9.1.0:GHC.Base c4231c43c07e46080a26bf94094c7aa1 |
||||
import -/ base-4.9.1.0:GHC.Err 3bba35a16538d33d424682ce66876cdd |
||||
import -/ base-4.9.1.0:GHC.List ab8c4e523e6c479c549d3bcd5fc4a439 |
||||
import -/ base-4.9.1.0:GHC.Num 00bfaa7b2f9d6084913c0697a8a49ec8 |
||||
import -/ base-4.9.1.0:GHC.Real 82e4e59051a13dba1da63e1e970a69e6 |
||||
import -/ base-4.9.1.0:GHC.Show a027f5ac24879eaba752f44aa90fe511 |
||||
import -/ base-4.9.1.0:GHC.Unicode a175ecf20bf1272d9ae31337e7da43ab |
||||
import -/ base-4.9.1.0:Numeric bdcfa841811670500691657d058d32ea |
||||
import -/ base-4.9.1.0:Prelude 22dd289b8469a8fa8dc81cab7b237771 |
||||
import -/ base-4.9.1.0:Text.Read 75c59863e882ebaec4532e9465e2ee9b |
||||
import -/ ghc-prim-0.5.0.0:GHC.Classes 0bdf3d057a415ec1b84a7b1994efbe47 |
||||
import -/ integer-gmp-1.0.0.1:GHC.Integer.Type 318df275d77dcdb18e0006d8d7870c2a |
||||
import -/ parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX:Text.Parsec.Char 72183c9c72a786c768d574329f0c66fb |
||||
import -/ parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX:Text.Parsec.Combinator 1043ef2e7d611405e8cfba488439d00f |
||||
import -/ parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX:Text.Parsec.Prim aa5741b3687798626ab8b304ae778581 |
||||
import -/ parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX:Text.Parsec.String c167df93b2a6f15c5a411724e2ca0d74 |
||||
import -/ parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX:Text.ParserCombinators.Parsec 210b9d7605a419b0319331228e92273a |
||||
import -/ parsec-3.1.11@parsec-3.1.11-1aqiimsgq2dCv7eoaC8WuX:Text.ParserCombinators.Parsec.Prim c1c3ee4c3eb13baea753600678a3bd4e |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text 28074c70d3351fb3368d27c0a438ae07 |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Internal 9bfcbbbe07ecef48f631025a838df7da |
||||
import -/ text-1.2.2.2@text-1.2.2.2-9UQZjEJZQFSGMffj1Z5g00:Data.Text.Show 516b88f1e0e0dbed91cb925542602306 |
||||
import -/ vector-0.12.0.1@vector-0.12.0.1-692PQMDMB6pIQ1uGwefDcQ:Data.Vector 6714bbd22aa495e7dd4cf02a1891a465 |
||||
import -/ Scheme.LispVal 46b64363eba4219a8339bd5306a4360f |
||||
exports: 844d3d3577cf0766f339ed033741201b |
||||
Atom 518c553b957f96229c04d962613c8ce5 |
||||
Bool dbac41db3b82f3fea12465f578f5a19a |
||||
Character c77fe378071c72d41e38e67b2618d129 |
||||
Complex 7a641d3b0bd7c5e3d8273672351389d1 |
||||
DottedList 7acd8295942e22e424d2916a0f83751e |
||||
Float 89c6cb511497324f5ce997796bf8a987 |
||||
LispVal 33b6c02c47a7551a9184b99ae0083a3e |
||||
List 0a2070a04f0dd8bad97a179a961201d6 |
||||
Number 4842d53183fe9748fd60f237e541b077 |
||||
Ratio bef0b11f16e69a98ce9bb0b5819c46fc |
||||
String 14f9831c7be786fd2b70dcef8ae8f42d |
||||
Vector 7242e1508efaf0ecc5cae232142232b1 |
||||
showVal 33b6c02c47a7551a9184b99ae0083a3e |
||||
7de6b73ede96a2fb99ae6485bb912a71 |
||||
$s$fStream[]mtok :: |
||||
Text.Parsec.Prim.Stream [tok] Data.Functor.Identity.Identity tok |
||||
{- Strictness: m, Inline: [ALWAYS] CONLIKE, |
||||
Unfolding: DFun: @ tok. |
||||
@ [tok] |
||||
@ Data.Functor.Identity.Identity |
||||
@ tok |
||||
(Scheme.Parse.$s$fStream[]mtok_$s$fStream[]mtok_$cp1Stream @ tok) |
||||
(Scheme.Parse.$s$fStream[]mtok_$s$fStream[]mtok_$cuncons @ tok) -} |
||||
e51a3671510b7d7bb9c9de915f1980d5 |
||||
$s$fStream[]mtok_$s$fStream[]mtok_$cp1Stream :: |
||||
GHC.Base.Monad Data.Functor.Identity.Identity |
||||
{- Strictness: m, |
||||
Unfolding: InlineRule (0, True, True) |
||||
(\ @ tok -> Data.Functor.Identity.$fMonadIdentity) -} |
||||
a62b1e6216ea925ef6bcd70ce10d7e0e |
||||
$s$fStream[]mtok_$s$fStream[]mtok_$cuncons :: |
||||
[tok] |
||||
-> Data.Functor.Identity.Identity (GHC.Base.Maybe (tok, [tok])) |
||||