/      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  6 None&357I      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEI      !"#$%&'()*+,-./0123456789:;<=>?@ABCDE NoneF%Convert a GADT to a normal data type.FFFNone4Print some value. The printer. The state of the pretty printer.The current line.Current column. Current indentation level. Just outputted a newline? Output of printer Source mappings.The current output.Global options of the printerAre we to pretty print?Use pretty thunk names?Use pretty operators?-default printer options (non-pretty printing)Default state.!Print the given printer indented.kOutput a newline and makes next line indented when prPretty is True. Does nothing when prPretty is FalsegWrite out a raw string, respecting the indentation Note: if you pass a string with newline characters, it will print them out even if prPretty is set to False. Also next line won't be indented. If you want write a smart newline (that is the one which will be written out only if prPretty is true, and after which the line will be indented) use )7exec one of Printers depending on PrintReader property.PGenerate a mapping from the Haskell location to the current point in the output.G>Write out a string, updating the current position information.HOutput concatenation! IGJH   IGJHSafe ! ! ! !NoneK.Extract the module name from a qualified name.LExtract the name from a QName.M(Change or add the ModuleName of a QName.NExtract the string from a Name.KLOMPQNKLOMPQNKLOMPQNNoneRThe CPP's parsing state."Parse some Fay code.SKApply incredibly simplistic CPP handling. It only recognizes the following: +#if FAY #ifdef FAY #ifndef FAY #else #endiflNote that this implementation replaces all removed lines with blanks, so that line numbers remain accurate.TThe parse mode for Fay.RUVW"ST#"#"#RUVW"ST#Safe XYZ[\]^_`abcdY_`abcd XYZ[\]^_`abcdNone)efghijklmnopqrstuvwxyz{|}~)efghijklmnopqrstuvwxyz{|}~)efghijklmnopqrstuvwxyz{|}~None$;The name of a module split into a list for code generation.&4Construct the complete ModulePath from a ModuleName.'FConstruct intermediate module paths from a ModuleName. mkModulePaths A.B => [[A], [A,B]](pConverting a QName to a ModulePath is only relevant for constructors since they can conflict with module names.$%&'($%&'($%&'(Safe)3Alias of liftIO, I hate typing it. Hate reading it.*)Do any of the (monadic) predicates match?+3Read from a process returning both std err and out.)*+      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~)*+*)+)*+None35.Helpful for writing qualified symbols (Fay.*).Helpful for some things.Helpful for some things.'$'None /Make an identifier from the built-in HJ module.<Mapping from unqualified names to qualified primitive names.:Lookup a primop that was resolved to a Prelude definition.[If this is resolved to a Prelude identifier or if it's unqualified, check if it's a primopNone,The serialization context indicates whether we're currently serializing some value or a particular field in a user-defined data type./IThese are the data types that are serializable directly to native JS data types. Strings, floating points and arrays. The others are: actions in the JS monad, which are thunks that shouldn't be forced when serialized but wrapped up as JS zero-arg functions, and unknown types can't be converted but should at least be forced.,-./0123456789:;<=>,-./0123456789:;<=>,-./0123456789:;<=>None?Literal value type.EA name of some kind.QExpression type.nStatement type.Just handy to have.??@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|?@ABCDE FGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|None FGIN}xConvert a Haskell value to a Fay json value. This can fail when primitive values aren't handled by explicit cases. ~& can be used to resolve this issue.~Convert a Haskell value to a Fay json value. This can fail when primitive values aren't handled by explicit cases. When this happens, you can add additional cases via the first parameter.qThe first parameter is a function that can be used to override the conversion. This usually looks like using ' to additional type- specific cases.,Convert a Fay json value to a Haskell value.~Convert a Fay json value to a Haskell value. This is like readFromFay, except it yields helpful error messages on failure.,Convert a Fay json value to a Haskell value.qThe first parameter is a function that can be used to override the conversion. This usually looks like using ' to additional type- specific cases.%Parse a data type or record or tuple.Parse a tuple.(Parse a data constructor from an object.RMake a simple ADT constructor from an object: { "slot1": 1, "slot2": 2} -> Foo 1 2;Make a record from a key-value: { "x": 1 } -> Foo { x = 1 }Parse a float.Parse a double. Parse an int. Parse a bool.Parse a string. Parse a char. Parse a Text.Parse an array. Parse unit.}~}~}~}~None35>CL$A standard module monad transformer.i is the type of module info, m is the underlying monad.tDifferent libraries (Cabal, haskell-src-exts, ...) use different types to represent module names. Hence this class.1This class defines the interface that is used by /, so that you can use it in monads other than .tYou don't typically have to define your own instances of this class, but here are a couple of cases when you might: A pure (non-*) mockup module monad for testing purposesA transformer over 7You need a more complex way to retrieve the module infoThe type of module infoGRead the module info, given a list of search paths and the module name@Convert module name from arbitrary representation to Cabal's one~Tries to find the module in the current set of packages, then find the module's info file, and reads and caches its contents.Returns  if the module could not be found in the current set of packages. If the module is found, but something else goes wrong (e.g. there's no info file for it), an exception is thrown.Run a  actionthe monadic action to run~return value, plus all cached module infos (that is, the initial set plus all infos that have been read by the action itself)  None*+-./*name is not in scopename is ambiguous+type is used where a type class is expected+type class is used where a type is expectedlAttempt to explicitly import a name which is not exported (or, possibly, does not even exist). For example: import Prelude(Bool(Right))The fields are: )optional parent in the import list, e.g. Bool in  Bool(Right)the name which is not exported)the module which does not export the namemodule not foundinternal error global value global type+local value, and location where it is bound-type variable, and location where it is boundhere the value name is boundhere the type name is definedimport: declaration, and the table of symbols that it introduces part of an import declarationexport( declaration, and the symbols it exportsxwildcard in a record pattern. The list contains resolved names of the fields that are brought in scope by this pattern.wildcard in a record construction expression. The list contains resolved names of the fields and information about values assigned to those fields. no annotation scope error\A pair of the name information and original annotation. Used as an annotation type for AST.Qualified name, where ] points to the module where the name was originally defined. The module part is never empty.MAlso contains name and version of the package where it was defined. If it's 6, then the entity is defined in the "current" package.8Possibly qualified name. If the name is not qualified,  is the empty string.!String representing a module name.String representing an unqualified entity nameuThe set of symbols (entities) exported by a single module. Contains the sets of value-level and type-level entities.'Information about a type-level entitity type synonym data typenewtype type family data family type class(Information about a value-level entitityvalue or function class methodrecord field selectordata constructorRepesents the symbol's fixity Display a  Display an Display an error.@Note: can span multiple lines; the trailing newline is included.F      !"#$A            !"#$None%Compute the extension set for the given module, based on the global preferences (e.g. specified on the command line) and module's LANGUAGE pragmas.&'()*+,-./012% base languageglobal extensions3 &'()*,-./12%&'()*+,-./012%3None+4+Global symbol table  contains global names456789:;<=>?@ABCDEF 45678=?@BCDE495678:;<=>?@ABCDEFNoneCG1Local symbol table  contains locally bound namesGHIJKGIJKGHIJKNoneFGL)Information about a field in the wildcardMthe field's simple nameNthe field's original nameOowhether there is a global value in scope with the same name as the field but different from the field selectorPAInformation about the names being introduced by a record wildcardDuring resolving traversal, we always (lazily) construct this list when we process PRec or RecConstr, even if it doesn't contain a wildcard.]Then, if the pattern or construction actually contains a wildcard, we use the computed value. LQMNOPRSTUVMNPUVLQMNOPRSTUVNoneWXYZ[If < ("qualified"), then only the qualified names are inserted.If :, then both qualified and unqualified names are insterted.\error for "not found" condition]error for "not found" conditionWXYZ[]WXYZ[\]None3579N^Get bound value identifiers._sFor record wildcards we need to know which fields the given constructor has. So we pass the global table for that.^_`abcdefghijklmn^_^_`abcdefghijklmnNone(13457>INo\Contains information about the node's enclosing scope. Can be accessed through the lenses: p, q, r, s.t:Describes how we should treat names in the current contextuA type that implements u< provides a way to perform a shallow scope-aware traversal.vThe algebra for wL. It's newtype-wrapped because an implicit parameter cannot be polymorphic.xCreate an initial scopey]Merge local tables of two scopes. The other fields of the scopes are assumed to be the same.z Analogous to { , but for u$o|}~tuwvpqrsxyz o|}~tuwvpqrsxyzo|}~tuwvpqrsxyz None 3457INChain a sequence of nodes where every node may introduce some variables into scope for the subsequent nodes. Examples: patterns (see note [Nested pattern scopes]), statements.!None!"3457GKLN  "None NvCompute module's global table. It contains both the imported entities and the global entities defined in this module.9Compute the symbols that are defined in the given module.[The import table is needed to resolve possible top-level record wildcard bindings, such as  A {..} = foo the import table for this module the import table for this module the import table for this module#None>L$None>GL)This function takes care of the possible hiding clause  all symbolsmentioned symbolsimported symbols %None>LNTake a set of modules and return a list of sets, where each sets for a strongly connected component in the import graph. The boolean determines if imports using SOURCE are taken into account.Annotate a module with scoping information. This assumes that all module dependencies have been resolved and cached  usually you need to run 1 first, unless you have one module in isolation.Compute interfaces for a set of mutually recursive modules and write the results to the cache. Return the set of import/export errors. takes a list of possibly recursive modules and computes the interface of each module. The computed interfaces are written into the mB's cache and are available to further computations in this monad.Returns the set of import/export errors. Note that the interfaces are registered in the cache regardless of whether there are any errors, but if there are errors, the interfaces may be incomplete.Like N, but also returns a list of interfaces, one per module and in the same order base language6global extensions (e.g. specified on the command line) input moduleoutput (annotated) module@module and all extensions with which it is to be compiled. Use % to build this list. base language6global extensions (e.g. specified on the command line) input modules errors in export or import lists base language6global extensions (e.g. specified on the command line) input modules4output modules, and errors in export or import lists&None'    'None$$$None Error type.None%DConfiguration of the compiler. The fields with a leading underscoreRun optimizationsFlatten function application?Export the runtime?Export the stdlib?Export only the stdlib?5Possibly a fay package name, and a include directory.Pretty print the JS output?-Output a HTML file including the produced JS.(Output a source map file as outfile.map.$Any JS files to link to in the HTML.%Don't invoke main in the produced JS.3Warn on dubious stuff, not related to typechecking.File path to output to.Typecheck with GHC.Typecheck with -Wall.&Run Google Closure on the produced JS.(The package config e.g. packages-6.12.3.Included Fay packages.#Custom source location for fay-baseProduce strict and uncurried JavaScript callable wrappers for all exported functions with type signatures in the given module:Only invoke GHC for typechecking, don't produce any output#Optimize away newtype constructors?Use pretty thunk names?Use pretty operators?Print commands sent to GHC?/Reading _configDirectoryIncludes is safe to do.8Get all include directories without the package mapping.:Get all include directories not included through packages.:Add a mapping from (maybe) a package to a source directory Add several include directories.;Add several include directories without package references.&Reading _configPackages is safe to do.Add a package to compilation#Add several packages to compilation5Should a strict wrapper be generated for this module?Default configuration.)%%(NoneFuGiven a configuration, resolve any packages specified to their data file directories for importing the *.hs sources.Resolve package.?Does a directory exist and does it contain any Haskell sources?Describe the given package.5Get the package version from the package description.!Make a share directory generator.None>CL%The JavaScript FFI interfacing monad.Compile monad.Uns the compiler+Configuration and globals for the compiler.The compilation configuration.#Things written out by the compiler. Constructors.Fay to JS dispatchers.JS to Fay dispatchers.State of the compiler.$Exported identifiers for all modulesMap types to constructorsMap constructors to fields3Newtype constructor, destructor, wrapped type tuple7Map of all imported modules and their source locations.LDepth of the current lexical scope, used for creating unshadowing variables.,Name of the module currently being compiled./Module paths that have code generated for them.5Use JS Strings instead of [Char] for string literals?9Module level declarations having explicit type signaturesSimple concatenating instance.  !$%&'(,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|nopqrstuvwxyz{|QRSTUVWXYZ[\]^_`abcdefghijklm?@ABCDEFGHIJKLMNOP !/0123456789:;<=>  ,-.$%&'(  )None 4Wrap an expression in a thunk.Wrap an expression in a thunk.Generate unique names.>Resolve a given maybe-qualified name to a fully qualifed name.lResolve a given maybe-qualified name to a fully qualifed name. Use this when a resolution failure is a bug.Resolve a newtype constructor.Resolve a newtype destructor.&Qualify a name for the current module.6Qualify a QName for the current module if unqualified.Make a top-level binding.Force an expression in a thunk.(Is a JS expression a literal (constant)?7Deconstruct a parse result (a la maybe, foldr, either).Get a config option.Optimize pattern matching conditions by merging conditions in common. TODO This is buggy and no longer used. Fails on tests/case3Throw a JS exception. (Throw a JS exception (in an expression). Is an alt a wildcard? Is a pattern a wildcard? 4Return formatter string if expression is a FFI call. CGenerate a temporary, SCOPED name for testing conditions and such.|Generate a temporary, SCOPED name for testing conditions and such. We don't have name tracking yet, so instead we use this.Print out a compiler warning.Pretty print a source location.(Lookup the record for a given type name. Get the fields for a given type.Get the flag used for GHC, this differs between GHC-7.6.0 and GHC-everything-else so we need to specially test for that. It's lame, but that's random flag name changes for you..Run the top level compilation for all modules.%Runs compilation for a single module.4Check if the given language pragmas are all present.if then else for when .'     '     '     *None4FGState. Optimize monad.!The arity of a function. Arity here is defined to be the number of arguments that can be directly uncurried from a curried lambda abstraction. So x y z -> if x then (a -> a) else (a -> a) has an arity of 3, not 4."9Run an optimizer, which may output additional statements.#&Inline x >> y to x;y in the JS output.$Flatten a a>>(b>>c) to [a,b,c].% Try to collect nested a>>(b>>c).&RPerform any top-level cross-module optimizations and GO DEEP to optimize further.'Perform tail-call optimization.(6Strip redundant forcing from the whole generated code.)8Strip redundant forcing from an application if possible.*OApply the given function to the top-level expressions in the given statements.+NApply the given function to the top-level expressions in the given statement.,9Collect functions and their arity from the whole codeset.-Get the arity of an expression..'Change foo(x)(y) to foo$uncurried(x,y).//Rename an uncurried copy of a curried function.012 !"#$%&'()*+,-./012 !"#$%&'()*+,-./012 !"#$%&'()*+,-./+None3MGet all non local identifiers that should be exported in the JS module scope.4=Is this *resolved* name a new type constructor or destructor?5.Is this *resolved* name a new type destructor?6/Is this *resolved* name a new type constructor?7>Add a ModulePath to CompileState, meaning it has been printed.8'Has this ModulePath been added/printed?9+Find the type signature of a top level name3:4567893:4567893:456789,None-47C ;<=>?@ABC;>?@ABC;<=>?@ABC-NoneD|Generate a temporary, SCOPED name for testing conditions and such. We don't have name tracking yet, so instead we use this.E9Generates temporary names where the scope doesn't matter.FLDon't call this directly, use withScopedTmpName or unscopedTmpNames instead.DEFDEDEF None47;Top level, desugar a whole module possibly returning errorsDesugar with the option to specify a prefix for generated names. Useful if you want to provide valid haskell names that HSE can print.G(a f ) => b -> a f b (f b) => a -> a f bH)Convert do notation into binds and thens.I7(,) => x y -> (x,y) (,,) => x y z -> (x,y,z) etcJ*case { ... } => foo -> case foo of { ... }K6if | p -> x | q -> y => case () of _ | p -> x | q -> yL(a,) => b -> (a,b)M!{a} => {a=a} for R{a} expressionsN{a} => {a=a} for R{a} patternsODesugar list comprehensions.PWe only have Enum instance for Int, but GHC hard codes [x..y] syntax to GHC.Base.Enum instead of using our Enum class so we check for obviously incorrect usages and throw an error on them. This can only checks literals, but it helps a bit.Q;Adds an explicit import Prelude statement when appropriate.RFor each toplevel FFI pattern binding, search the module for the relevant type declaration; if found, add a type signature to the ffi expression. e.g. foo :: Int foo = ffi "3" becomes foo :: Int foo = ffi "3" :: IntSa T/ b => op a b a + b => (+) a b for expressionsUa : b => (:) a b for patterns(a) => a for patternsGHVIJKLMNOPQWRXYSUZ[\GHVIJKLMNOPQWRXYSUZ[\ None3The opposite of Ptr+. Serialize the specified polymorphic type. foo :: Automatic a -> String=Do not serialize the specified type. This is useful for, e.g. &foo :: String -> String foo = ffi "%1"`This would normally serialize and unserialize the string, for no reason, in this case. Instead: foo :: Ptr String -> Ptr String$Will just give an identity function.Values that may be undefined Defined x encodes to x, Undefined decodes to undefined. An undefined property in a record will be removed when encoding.HValues that may be null Nullable x decodes to x, Null decodes to null.Declare a foreign action. The foreign value.Bottom. .None ]7Compile the given pattern against the given expression.^"Compile a pattern variable e.g. x._Compile a record field pattern.`-Compile a literal value from a pattern match.a#Compile as binding in pattern matchb%Compile a pattern match on a newtype.cCompile a pattern application.dCompile a pattern list.]^_`abcd]^_`abcd]^_`abcd/NoneePrint the JS to a flat string.f Print the JS to a pretty string.gEEncode String to JS-format lterals. Could use the Text.JSON library.hPrints pretty operators. prPrettyOperator flag determines the way of accessing operators (e.g. `($)`) and identifiers with apostrophes (e.g. length'H). If prPrettyOperators is set true, then these will be accessed with square brackets (e.g. Prelude["$"] or Prelude["length'"]). Otherwise special characters will be escaped and accessed with dot (e.g. Prelude.$36$ or Prelude.length$39$). Alphanumeric_ identifiers are always accessed with dot operator (e.g. Prelude.length)iPrint a list of statements.jUnqualify a JsName.k'Print a constructor name given a QName.lPrint an unqualified name.m<Print a constructor name given a Name. Helper for printCons.nbWords reserved in haskell as well are not needed here: case, class, do, else, if, import, in, letoeThis is a hack for names generated in the Haskell AST. Should be removed once it's no longer needed.$Encode a Haskell name to JavaScript.p3Normalize the given name to JavaScript-valid names.qIntercalate monoids.r Print one of the kinds of names.sPrint an expression.tPrint a module path.uPrint a single statement.v/Print special constructors (tuples, list, etc.)w#Print (and properly encode) a name.xPrint module name.y3Print (and properly encode to JS) a qualified name.zPrint literals.efghijklmn{opqrstuvwxyzefghijklmn{opqefghijklmn{opqrstuvwxyz0None 4F|KCompile an FFI expression (also used when compiling top level definitions).}LWarn about uses of naked x.y which will not play nicely with Google Closure.~Make a Fay!JS encoder.A name used for transcoding.?The name used for the forced version of a transcoding variable.!Get arg types of a function type.9Convert a Haskell type to an internal FFI representation.Expand a type application.Generate a user-defined type.Translate: JS ! Fay.Translate: Fay ! JS.Make a translator.DGet a JS-representation of a fundamental type for encoding/decoding.Get the arity of a type.7Format the FFI format string with the given arguments..Generate n name-typ pairs from the given list.Generate Fay!JS encoding.Generate JS!Fay decoding.Make a JS!Fay decoder.LThe argument types used in serialization of parametrized user-defined types.@Get the index of a name from the set of type variables bindings..Extract the name from a possibly-kinded tyvar.|}~Source Location.The format string. Arguments. The JS code.|~|}~1None 357Compile Haskell expression.Compile variable.Compile Haskell literal.Compile simple application.Helper for compileApp.Compile a negate applicationCompile a let expression.Compile let declaration.Compile a list expression.Compile an if.Compile case expressions.7Compile the given pattern against the given expression.Compile a guarded alt.Compile guardsCompile a lambda.$Compile [e1..] arithmetic sequences.&Compile [e1..e3] arithmetic sequences.'Compile [e1,e2..] arithmetic sequences.)Compile [e1,e2..e3] arithmetic sequences.wCompile a record construction with named fields | GHC will warn on uninitialized fields, they will be undefined in JS.Compile a record update.Make a Fay list.5Optimize short literal [e1..e3] arithmetic sequences.8Optimize short literal [e1,e2..e3] arithmetic sequences.[Maximum number of elements to allow in strict list representation of arithmetic sequences.2None 357Compile Haskell declaration.Compile a declaration.!Compile a top-level pattern bind.(Compile a normal simple pattern binding.FCompile a data declaration (or a GADT, latter is converted to former).CCompile a function which pattern matches (causing a case analysis).%Compile a right-hand-side expression.3None The data-files source directory."The default compiler reader value.The default compiler state.4None'Call out to GHC to type-check the file.5None F$Start the compilation process using  compileModule to compile a file.Compile a module$Compile a module given its file path5Lookup a module from include directories and compile.Compile an import.<Find an import's filepath and contents from its module name.6None EPreprocess and collect all information needed during code generation.3Preprocess a module given its filepath and content.Preprocess from an AST PreprocessingFind newtype declarationsAdd new types to the state$Add record declarations to the stateNone  357N >Compile a Haskell source string to a JavaScript source string.!Compile the top-level Fay module.Compile a source string.-Compile given the location and source string.Compile a parse HSE module.6For a module A.B, generate | var A = {}; | A.B = {};ZGenerate exports for non local names, local exports have already been added to the module.7Generate strict wrappers for the exports of the module.sIs the module a standard module, i.e., one that we'd rather not output code for if we're compiling separate files.  " "  None 357 \Compile the given file and write the output to the given path, or if nothing given, stdout.fCompile the given file and write to the output, also generates HTML and sourcemap files if configured.Compile the given file.7Compile a file returning additional generated metadata.Compile a file returning the resulting internal state of the compiler. Don't use this directly, it's only exposed for the test suite..Compile the given module to a runnable module.,Convert a Haskell filename to a JS filename.,Print a compile error for human consumption.TGet the JS runtime source. This will return the user supplied runtime if it exists."Get the default JS runtime source. \ !7 ! 7899:;;<=>?@@ABCCDEFGHIJKLMNOPPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~wq  )     o  g g  h h  125        ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _ ` a b c d e f g h i j k lmnopqrstuvwxyz{|}~V        !"#$%&'()*+,-./01234567898:8;8<8=8>8?8@8A8B8C8D8E8FGHIJKLMNOPQRQSQTQTQUQVQWQXQYQZQ[Q\Q\]^_`abcdefghijklmnopmqmr"stuvwxyz{|}~            !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXWYWZW[W\W]W^W_W`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./01234567 !8#9:%;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^^6_]`abcdefghijk]]ldmnopqmrstuvwxyz{|}~                     !!!d!e"""""""###$$$$$$$$$$$%%%%%''''''''''''''''''''''''''''''''''''(((((( ))))))))))))))))))))))))) ) ) ) ) )))))))))********** *!*"*#*$*%*&*'**(*)+*+++,+-+.+/+0+1,2,2,3,4,4,5,6,7,8--9-: ; < = > ? @ A B C D E F GHIJ K L M N O P Q R.S.T.U.V.W.X.Y.Z/[/\/]/^/_/`/a/b/c/d/e/f/g/h/i/j/k/l/m/n/o/p/q0r0s0t0u0v0w0x0y0z0{0|0}0~00000000011111111111111111111111122222223334555556666666 fay_CoBdu6XWgav1kACCByMg3r Fay.TypesFay.Types.CompileResultFay.Compiler.ParseFay.Compiler.Prelude Fay.ConvertFay.Types.CompileError Fay.Config Fay.CompilerFay.Compiler.DesugarFay.FFIFay#Language.Haskell.Names.Open.DerivedFay.Compiler.GADTFay.Types.PrinterFay.Compiler.QName Paths_fayFay.ExtsFay.Types.ModulePathFay.Exts.NoAnnotationFay.Compiler.PrimOp Fay.Types.FFI Fay.Types.JsFay.Compiler.ModuleTLanguage.Haskell.Names.Types"Language.Haskell.Names.SyntaxUtils(Language.Haskell.Names.GlobalSymbolTable'Language.Haskell.Names.LocalSymbolTable&Language.Haskell.Names.RecordWildcards!Language.Haskell.Names.ScopeUtilsLanguage.Haskell.Names.GetBound Language.Haskell.Names.Open.Base%Language.Haskell.Names.Open.Instances Language.Haskell.Names.Annotated$Language.Haskell.Names.ModuleSymbolsLanguage.Haskell.Names.ExportsLanguage.Haskell.Names.Imports Language.Haskell.Names.RecursiveLanguage.Haskell.NamesFay.Exts.ScopedFay.Compiler.PackagesFay.Compiler.MiscFay.Compiler.OptimizerFay.Compiler.StateFay.Compiler.Desugar.TypesFay.Compiler.Desugar.NameFay.Compiler.PatternFay.Compiler.PrintFay.Compiler.FFIFay.Compiler.ExpFay.Compiler.DeclFay.Compiler.DefaultsFay.Compiler.TypecheckFay.Compiler.ImportFay.Compiler.InitialPass PrintableprintJSPrinter runPrinter PrintStatepsLinepsColumn psIndentLevel psNewline PrintWriter pwMappingspwOutput PrintReaderprPrettyprPrettyThunksprPrettyOperatorsdefaultPrintReaderpwOutputStringdefaultPrintState execPrinterindentednewlinewriteaskIfmapping CompileResult resOutput resImportedresSourceMappingsparseFaydefaultExtensions ModulePath unModulePath mkModulePath mkModulePathsmkModulePathFromQNameioanyMreadAllFromProcessSerializeContextSerializeAnywhereSerializeUserArgFundamentalType FunctionTypeJsTypeListType TupleType UserDefinedDefinedNullableDateType StringType DoubleTypeIntTypeBoolTypePtrType Automatic UnknownTypeJsLitJsCharJsStrJsInt JsFloatingJsBoolJsName JsNameVarJsThisJsParametrizedTypeJsThunkJsForceJsApplyJsParamJsTmp JsConstructor JsBuiltIn JsModuleNameJsExpJsRawExpJsSeqJsFunJsAppJsNegApp JsTernaryIfJsNullJsParen JsGetPropJsLookup JsUpdatePropJsGetPropExternJsUpdatePropExternJsListJsNew JsThrowExp JsInstanceOfJsIndexJsEqJsNeqJsInfixJsObjJsLitObj JsUndefinedJsAndJsOrJsStmtJsVarJsIf JsEarlyReturnJsThrowJsWhileJsUpdate JsSetProp JsSetQName JsSetModuleJsSetConstructorJsSetPropExtern JsContinueJsBlock JsExpStmt showToFay encodeFay readFromFay readFromFay' decodeFay CompileErrorCouldn'tFindImport EmptyDoBlockFfiFormatBadCharsFfiFormatIncompleteArgFfiFormatInvalidJavaScriptFfiFormatNoSuchArgFfiNeedsTypeSigGHCErrorInvalidDoBlock ParseErrorShouldBeDesugaredUnableResolveQualifiedUnsupportedDeclarationUnsupportedEnumUnsupportedExportSpecUnsupportedExpressionUnsupportedFieldPatternUnsupportedImportUnsupportedLetUnsupportedLetBindingUnsupportedLiteralUnsupportedModuleSyntaxUnsupportedPatternUnsupportedQualStmtUnsupportedRecursiveDoUnsupportedRhsUnsupportedWhereInAltUnsupportedWhereInMatchConfigconfigOptimizeconfigFlattenAppsconfigExportRuntimeconfigExportStdlibconfigExportStdlibOnlyconfigPrettyPrintconfigHtmlWrapperconfigSourceMapconfigHtmlJSLibs configLibrary configWarnconfigFilePathconfigTypecheck configWallconfigGClosureconfigPackageConfconfigBasePath configStrictconfigTypecheckOnlyconfigRuntimePathconfigOptimizeNewtypesconfigPrettyThunksconfigPrettyOperatorsconfigShowGhcCalls defaultConfigdefaultConfigWithSandboxconfigDirectoryIncludesconfigDirectoryIncludePaths%nonPackageConfigDirectoryIncludePathsaddConfigDirectoryIncludeaddConfigDirectoryIncludesaddConfigDirectoryIncludePathsconfigPackagesaddConfigPackageaddConfigPackagesshouldExportStrictWrapper CompileModuleCompile unCompile CompileReader readerConfigreaderCompileLitreaderCompileDecls CompileWriter writerCons writerFayToJs writerJsToFay CompileStatestateInterfacesstateRecordTypes stateRecords stateNewtypes stateImportedstateNameDepthstateModuleNamestateJsModulePathsstateUseFromString stateTypeSigsrunCompileModuledesugardesugar'desugarPatParendesugarExpParenPtr UndefinedNullffi compileExp compileDecl compileWith compileViaStrcompileToplevelModulecompileModuleFromContentscompileModuleFromAST compileFromTocompileFromToAndGenerateHtml compileFilecompileFileWithResultcompileFileWithStatetoJsNameshowCompileErrorgetConfigRuntime getRuntime$fGTraversablecModuleName$fGTraversablecSpecialCon$fGTraversablecQName$fGTraversablecName$fGTraversablecBoxed$fGTraversablecIPName$fGTraversablecQOp$fGTraversablecOp$fGTraversablecCName$fGTraversablecModule$fGTraversablecModuleHead$fGTraversablecExportSpecList$fGTraversablecExportSpec$fGTraversablecImportDecl$fGTraversablecImportSpecList$fGTraversablecImportSpec$fGTraversablecAssoc$fGTraversablecDecl$fGTraversablecAnnotation$fGTraversablecDataOrNew$fGTraversablecDeclHead$fGTraversablecInstHead$fGTraversablecInstRule$fGTraversablecDeriving$fGTraversablecBinds$fGTraversablecIPBind$fGTraversablecMatch$fGTraversablecQualConDecl$fGTraversablecConDecl$fGTraversablecFieldDecl$fGTraversablecGadtDecl$fGTraversablecClassDecl$fGTraversablecInstDecl$fGTraversablecBangType$fGTraversablecRhs$fGTraversablecGuardedRhs$fGTraversablecType$fGTraversablecTyVarBind$fGTraversablecKind$fGTraversablecFunDep$fGTraversablecContext$fGTraversablecAsst$fGTraversablecLiteral$fGTraversablecExp$fGTraversablecXName$fGTraversablecXAttr$fGTraversablecBracket$fGTraversablecSplice$fGTraversablecSafety$fGTraversablecCallConv$fGTraversablecModulePragma$fGTraversablecTool$fGTraversablecActivation$fGTraversablecRule$fGTraversablecRuleVar$fGTraversablecWarningText$fGTraversablecPat$fGTraversablecPXAttr$fGTraversablecRPatOp$fGTraversablecRPat$fGTraversablecPatField$fGTraversablecStmt$fGTraversablecQualStmt$fGTraversablecFieldUpdate$fGTraversablecAlt$fGTraversablecPromoted$fGTraversablecBooleanFormula$fGTraversablecTypeEqn$fGTraversablecOverlap$fGTraversablecSign$fGTraversablecNamespace$fGTraversablecRole"$fGTraversablecPatternSynDirection convertGADT$fIsStringPrinter$fMonoidPrintWriterwriteRWS$fMonoidPrinterqModNameunQual changeModuleunname unQualify changeModule' withIdentCPPStateapplyCPP parseModeNoCPPCPPIfCPPElsecatchIOversionbindirlibdirdatadir libexecdir sysconfdir getBinDir getLibDir getDataDir getLibexecDir getSysconfDirgetDataFileNameType TyVarBindStmtSrcLoc SpecialConRhsQualStmt QualConDeclQOpQNamePatFieldPatName ModulePragma ModuleNameModuleMatchLiteral ImportSpec ImportDecl GuardedRhsGadtDecl FieldUpdate FieldDecl ExportSpecExpExDeclHeadDecl ClassDeclBangTypeAltX moduleName moduleExportsmoduleNameStringmkIdentnoIconvertFieldDeclfieldDeclNames declHeadNamebaseGHC.Base++GHC.Errerrorghc-primGHC.PrimseqGHC.Listfilterzip System.IOprint Data.Tuplefstsnd otherwisemap$ undefinedGHC.Num fromInteger-GHC.Real fromRationalGHC.EnumenumFrom enumFromThen enumFromToenumFromThenTo GHC.Classes==>=negatefail>>=>>fmapreturn Control.Arrowfirst||| fromIntegral realToFrac toInteger toRationaljoin<*>pureBoundedEnumEq GHC.FloatFloating FractionalIntegralMonad Data.DataDataFunctorNumOrdGHC.ReadReadReal RealFloatRealFracGHC.ShowShowData.Typeable.InternalTypeable Applicative Data.FoldableFoldableData.Traversable Traversable GHC.TypesBoolCharDoubleFloatInt integer-gmpGHC.Integer.TypeIntegerOrderingRationalIOWord Data.EitherEitherStringFalseTrueLeftRightLTEQGTJust Data.Functor<$>MaybeNothing<**> GHC.UnicodeisSpaceisAlphaisDigit Text.Readread Alternativemplusmzero MonadPlusgmapMogmapMpgmapMgmapQigmapQgmapQrgmapQlgmapT dataCast2 dataCast1 dataTypeOftoConstrgunfoldgfoldl Data.ListisSubsequenceOf Control.Monadmfilter<$!>unless replicateM_ replicateMfoldM_foldM zipWithM_zipWithM mapAndUnzipMforever<=<>=>filterMfoldMapDefault fmapDefault mapAccumR mapAccumLforMforsequencemapM sequenceAtraverseControl.ApplicativeoptionalgetConstConst unwrapMonad WrapMonad WrappedMonad unwrapArrow WrapArrow WrappedArrow getZipListZipList&&&***second+++readIOreadLn appendFile writeFilereadFileinteract getContentsgetLinegetCharputStrLnputStrputCharGHC.IO.ExceptionioErrorGHC.IOFilePath userErrorIOErrorreadsfindnotElem minimumBy maximumByallanyorand concatMapconcatmsum sequence_forM_mapM_productsumminimummaximumelemlengthnullfoldl1foldr1foldl'foldlfoldrfoldMap Data.Monoid<>isRightisLeftpartitionEithersrightsleftseither Data.OldListunwordswordsunlineslinesunfoldrsortOnsortBysort permutations subsequencestailsinitsgroupBygroupdeleteFirstsByunzip7unzip6unzip5unzip4zipWith7zipWith6zipWith5zipWith4zip7zip6zip5zip4genericReplicate genericIndexgenericSplitAt genericDrop genericTake genericLengthinsertByinsert partition transpose intercalate intersperse intersectBy intersectunionByunion\\deleteBydeletenubBynub isInfixOf isSuffixOf isPrefixOf findIndices findIndex elemIndices elemIndex stripPrefix dropWhileEnd Data.Char isSeparatorisSymbol isPunctuationisNumberisMarkisLettergeneralCategory digitToIntData.Ord comparingDown readLitChar lexLitCharlex readParenreadList readsPrecatanhacoshasinhtanhcoshsinhatanacosasintancossinlogBase**sqrtlogpiatan2isIEEEisNegativeZeroisDenormalized isInfiniteisNaN scaleFloat significandexponent encodeFloat decodeFloat floatRange floatDigits floatRadixText.ParserCombinators.ReadPReadStoTitletoUppertoLowerisLowerisUpperisPrint isControl isAlphaNum isHexDigit isOctDigit isAsciiUpper isAsciiLowerisLatin1isAsciilcmgcd^^^oddevendivModquotRemdivremquotrecip/floorceilingroundtruncateproperFractionmaxBoundminBoundfromEnumtoEnumpredsuccGHC.Charchr Data.Functiononvoid intToDigit showLitChar showParen showStringshowCharshowsShowSshowListshow showsPrecunzip3unzipzipWith3zipWithzip3!!lookupreversebreakspansplitAtdroptake dropWhile takeWhilecycle replicaterepeatiteratescanr1scanrscanl'scanl1scanlfoldl1'initlasttailunconshead Data.MaybemapMaybe catMaybes listToMaybe maybeToList fromMaybefromJust isNothingisJustmaybeuncurrycurrysubtractsignumabs*+asTypeOfuntil$!flip.constidordapliftM5liftM4liftM3liftM2liftMwhen=<<liftA3liftA2liftA<**>mconcatmappendmemptyMonoid<$manysome<|>empty/=compare<=&&||not<>maxminsafe_BXSoeRP9IFG6t9s3abNgViSafe toEnumSafe toEnumNote toEnumDef toEnumMayfindIndexJustNotefindIndexJustDef findIndexJustelemIndexJustNoteelemIndexJustDef elemIndexJust findJustNote findJustDeffindJustlookupJustNote lookupJustDef lookupJustreadNotereadDefreadMayatNoteatDefatMayat assertNote fromJustNote fromJustDef scanl1Note scanr1Note scanl1Def scanr1Def scanl1May scanr1May foldl1Note' foldl1Note foldr1Note foldl1Def' foldl1Def foldr1Def foldl1May' foldl1May foldr1May maximumByNote minimumByNote maximumByDef minimumByDef maximumByMay minimumByMay maximumNote minimumNote maximumDef minimumDef maximumMay minimumMaylastNoteheadNotelastDefheadDeflastMayheadMayinitSafeinitNoteinitDefinitMaytailSafetailNotetailDeftailMayabort$fIsStringModuleName$fIsStringQName$fIsStringName SrcSpanInfoSrcSpanSignunAnn fayBuiltin primOpsMap findPrimOp resolvePrimOp$fIsStringJsLitsyb_2wX6OHAY1mu1En8Oic6xKRData.Generics.AliasesextQextRparseDataOrTuple parseTuple parseObject makeSimple makeRecord parseFloat parseDoubleparseInt parseBool parseString parseChar parseText parseArray parseUnit GenericParser encodeGeneric lookupField parseUTCTimebadData justRightModuleTModName MonadModule getModuleInfotrans_3eG64VdP2vzGjP6wJiCp5XControl.Monad.IO.ClassMonadIO ModuleInforeadModuleInfoconvertModuleName runModuleT modToString lookupInCache insertInCache fromString$fMonadModuleModuleT$fMonadIOModuleT$fMonadTransModuleT $fModName[] ENotInScope EAmbiguous ETypeAsClass EClassAsType ENotExported EModNotFound EInternal GlobalValue GlobalType LocalValueTypeVar ValueBinder TypeBinderImport ImportPartExportRecPatWildcardRecExpWildcardNone ScopeErrorScopedOrigName ModuleNameSGNameNameSSymbols SymTypeInfoSymTypeSymData SymNewType SymTypeFam SymDataFamSymClass SymValueInfoSymValue SymMethod SymSelectorSymConstructor SymFixityppGName ppOrigNameppErrorErrorNameInfo origGNamegModulegName HasOrigNameorigName st_origName st_fixity sv_origName sv_fixity sv_className sv_typeNamesv_constructors ExtensionSetvalSymstySymsmkValmkTysLoc$fSrcInfoScoped$fMonoidSymbols$fHasOrigNameSymTypeInfo$fHasOrigNameSymValueInfomoduleExtensionsdropAnn getModuleName getImportsgetModuleDeclsgetExportSpecList getModuleHead qNameToNamegetDeclHeadName nameToString stringToNamespecialConToStringunCName getErrorsgetModuleExtensionsTableResultSpecialvalLenstyLenstoGNamelookupL lookupValue lookupTypefromMaps fromListsvaluestypes toSymbols $fMonoidTableaddValueWcField wcFieldNamewcFieldOrigNamewcExistsGlobalValueWcNamesgetElidedFieldsnameOfPatFieldnameOfUpdField patWcNames expWcNames scopeErrornonenoScope sv_parentcomputeSymbolTable resolveCName resolveCNamesGetBoundgetBound getBoundSign$fGetBoundPatl$fGetBoundQualStmtl$fGetBoundStmtl$fGetBoundMatchl$fGetBoundClassDecll$fGetBoundFieldDecll$fGetBoundConDecll$fGetBoundGadtDecll$fGetBoundQualConDecll$fGetBoundDecll$fGetBoundBindsl$fGetBound(,)l$fGetBoundMaybel $fGetBound[]lScopegTablelTablenameCtxwcNames NameContext ResolvableAlg rtraverse initialScopemergeLocalScopesrmaptrave_BzGRmkRXI6QALssmzn9tg4Data.Generics.Traversablegmap_gTable_lTable_nameCtx_wcNamesBindingTBindingV ReferenceT ReferenceVOtherConstraintProxyrunAlgalgdefaultRtraverseintro setNameCtx setWcNamesbinderVbinderTexprVexprT $fResolvableachainc<|-:$fResolvableSrcSpanInfo$fResolvableSrcSpan$fResolvableScoped$fResolvableQualStmt$fResolvable[]$fResolvableGuardedRhs$fResolvableAlt$fResolvableExp$fResolvableBinds$fResolvableMatch$fResolvablePatField$fResolvablePat$fResolvableFieldDecl$fResolvableConDecl$fResolvableDeclHead$fResolvableType$fResolvableDeclannotate annotateRec moduleTable moduleSymbols Constructors SelectorNameConNameTypeNamegetTopDeclSymbolsprocessExportsresolveExportSpecListresolveExportSpeccomputeImportedSymbols preludeNameprocessImports processImportresolveImportDeclresolveImportSpecList symbolMapresolveImportSpecann2syms checkUnique$fModNameModuleName groupModulesannotateModulecomputeInterfaces findFixPoint getInterfaces srcSpanInfo_configDirectoryIncludes_configPackages$fDefaultConfigresolvePackagesresolvePackagedoesSourceDirExistdescribePackagepackageVersion getShareGen$fMonoidCompileWriter liftModuleT$fMonadModuleCompilethunk stmtsThunk uniqueNamestryResolveNameunsafeResolveNamelookupNewtypeConstlookupNewtypeDestqualify qualifyQName bindToplevelforce isConstant parseResultconfigoptimizePatConditionsthrowthrowExp isWildCardAlt isWildCardPatffiExpwithScopedTmpJsNamewithScopedTmpNamewarn printSrcLoc typeToRecs typeToFieldsgetGhcPackageDbFlag runTopCompilehasLanguagePragmasifOptimizeNewtypesorigName2QNamereplaceWithBuiltInsioWarnprintSrcSpanInfo printSrcSpan recToFieldsshouldBeDesugaredhasLanguagePragmaOptStateOptimize FuncArity runOptimizer inlineMonadflattencollectoptimizeTopleveltcostripAndUncurrywalkAndStripForcesapplyToExpsInStmtsapplyToExpsInStmt collectFuncsexpArityuncurryBindingrenameUncurriedoptStmts optUncurry!getNonLocalExportsWithoutNewtypes isNewtype isNewtypeDest isNewtypeCons addModulePathaddedModulePath findTypeSiggetLocalExportsWithoutNewtypesDesugar unDesugar DesugarReaderreaderNameDepth readerNoInforeaderTmpNamePrefix runDesugarunscopedTmpNamestmpNamedesugarSection desugarDodesugarTupleCon desugarLCasedesugarMultiIfdesugarTupleSectiondesugarFieldPundesugarPatFieldPundesugarListComp checkEnumdesugarImplicitPreludedesugarToplevelFFITypeSigsdesugarInfixOphaske_DZIEnGTTeZ2FBSHYHSA9eL%Language.Haskell.Exts.Annotated.BuildopdesugarInfixPat desugarStmt'desugarFFITypeSigsdesugarBindsTypeSigsaddFFIExpTypeSigs transformBi universeBi transformBiM compilePat compilePVarcompilePatFields compilePLit compilePAsPatcompileNewtypePat compilePApp compilePList printJSString printJSPretty toJsStringLit printProp printStmtsident printConsprintConsUnQual printConsName reservedWords encodeName normalizeName mintercalate$fPrintableJsName$fPrintableJsExp$fPrintableModulePath$fPrintableJsStmt$fPrintableSpecialCon$fPrintableName$fPrintableModuleName$fPrintableQName$fPrintableJsLitallowedNameChars compileFFIExp warnDotUses emitFayToJstranscodingObjtranscodingObjForcedfunctionTypeArgsargType expandApp userDefinedjsToFayfayToJs translatetypeRep typeArity formatFFI explodeFields fayToJsHash jsToFayHash emitJsToFayargTypesgetIndextyvar compileVar compileLit compileApp compileApp' compileNegApp compileLetcompileLetDecl compileList compileIf compileCase compilePatAltcompileGuardedAlt compileGuards compileLambdacompileEnumFromcompileEnumFromTocompileEnumFromThencompileEnumFromThenTocompileRecConstrcompileRecUpdatemakeList optEnumFromTooptEnumFromThenTomaxStrictASLen compileDeclscompilePatBindcompileUnguardedRhscompileDataDeclcompileFunCase compileRhsmkTyVars faySourceDirdefaultCompileReaderdefaultCompileState typecheck startCompilecompileModuleFromFilecompileModuleFromName compileImport findImport initialPasspreprocessFileWithSource preprocessASTscanNewtypeDeclscompileNewtypeDeclscanRecordDecls scanTypeSigscompileFileWithSourcecreateModulePathgenerateExportsgenerateStrictExportsanStdlibModulecompileToModule