1w      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~          6 None*9;<=L !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[L !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[ None\%Convert a GADT to a normal data type.\\\None:Print 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.]>Write out a string, updating the current position information.^Output concatenation! _]`^   _]`^Safe ! ! ! !Nonea.Extract the module name from a qualified name.bExtract the name from a QName.c(Change or add the ModuleName of a QName.dExtract the string from a Name.abecfgdabecfgdabecfgdNonehThe CPP's parsing state.#Parse some Fay code.iKApply 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.jThe parse mode for Fay.hklm#ij$#$#$hklm#ij$Safe nopqrstuvwxyzouvwxyz nopqrstuvwxyzNone){|}~){|}~){|}~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{|}~*+,+*,*+,None9;.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.0IThese 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:;<=>?-./076>1234589:;<=?-./0123456789:;<=>?None@Literal value type.FA name of some kind.RExpression type.oStatement type.Just handy to have.?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}>@ABCDEFGHIJKLMNOPQRWSTUVXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}@ABCDEF GHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}None$LMOT~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.~~~~None9;DIR$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 I 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/0234*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 I6, 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 !  " #$ %&' ()*+,-./0123456789:;A !  " #$ %&' ()*+,-0./1234567 !   " #$ %&' ()*+,+,+,+,+,+,-.-./-.01-.023456789:;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.=>?@ABCDEFGHI< base languageglobal extensionsJ =>?@ACDEFHI<=>?@ABCDEFGHI<JNone0K+Global symbol table  contains global namesKLMNOPQRSTUVWXYZ[\] KLMNOTVWYZ[\KPLMNOQRSTUVWXYZ[\]NoneI^1Local symbol table  contains locally bound names^_`ab^`ab^_`abNone#LMc)Information about a field in the wildcarddthe field's simple nameethe field's original namefowhether there is a global value in scope with the same name as the field but different from the field selectorgAInformation 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. chdefgijklmedglmchdefgijklmNonenopqrIf B< ("qualified"), then only the qualified names are inserted.If A:, then both qualified and unqualified names are insterted.serror for "not found" conditionterror for "not found" conditionnopqrtnopqrstNone #9;<=?TuGet bound value identifiers.vsFor record wildcards we need to know which fields the given constructor has. So we pass the global table for that.uvwxyz{|}~uvuvwxyz{|}~None,69:;<=DOT\Contains information about the node's enclosing scope. Can be accessed through the lenses: , , , .:Describes how we should treat names in the current contextA type that implements < provides a way to perform a shallow scope-aware traversal.The algebra for L. It's newtype-wrapped because an implicit parameter cannot be polymorphic.Create an initial scope]Merge local tables of two scopes. The other fields of the scopes are assumed to be the same. Analogous to  , but for $  None 9:;<=OTChain 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.45!None%&:<=MQRT!  ""None$TvCompute 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#NoneDR$NoneDMR)This function takes care of the possible hiding clause  all symbolsmentioned symbolsimported symbols %NoneDRTTake 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'!  " #$ %&'()*-0./1'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.)%%(NoneLuGiven 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.      NoneDIR%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.    !%&'()-./076>1234589:;<=?@ABCDEFGHIJKLMNOPQRWSTUVXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}opqrstuvwxyz{|}RSTUVWXYZ[\]^_`abcdefghijklmn@ABCDEFGHIJKLMNOPQ !0123456789:;<=>?  -./%&'()    )None!"$: Wrap 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 .' +, !"#-$./%0&'(1)2*' +, !"#-$./%0&'(1)2*' +, !"#-$./%0&'(1)2**None:LM3State.4Optimize monad.5The 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.69Run an optimizer, which may output additional statements.7&Inline x >> y to x;y in the JS output.8Flatten a a>>(b>>c) to [a,b,c].9 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.AGet the arity of an expression.B'Change foo(x)(y) to foo$uncurried(x,y).C/Rename an uncurried copy of a curried function.3DEF456789:;<=>?@ABC3DEF456789:;<=>?@ABC3DEF456789:;<=>?@ABC+None#GMGet all non local identifiers that should be exported in the JS module scope.H=Is this *resolved* name a new type constructor or destructor?I.Is this *resolved* name a new type destructor?J/Is this *resolved* name a new type constructor?K>Add a ModulePath to CompileState, meaning it has been printed.L'Has this ModulePath been added/printed?M+Find the type signature of a top level nameGNHIJKLMGNHIJKLMGNHIJKLM,None2:<=I OPQRSTUVWORSTUVWOPQRSTUVW-NoneX|Generate a temporary, SCOPED name for testing conditions and such. We don't have name tracking yet, so instead we use this.Y9Generates temporary names where the scope doesn't matter.ZLDon't call this directly, use withScopedTmpName or unscopedTmpNames instead.XYZXYXYZ None:<=;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.[(a f ) => b -> a f b (f b) => a -> a f b\)Convert do notation into binds and thens.]7(,) => x y -> (x,y) (,,) => x y z -> (x,y,z) etc^*case { ... } => foo -> case foo of { ... }_6if | p -> x | q -> y => case () of _ | p -> x | q -> y`(a,) => b -> (a,b)a!{a} => {a=a} for R{a} expressionsb{a} => {a=a} for R{a} patternscDesugar list comprehensions.dWe 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.e;Adds an explicit import Prelude statement when appropriate.fFor 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" :: Intga h/ b => op a b a + b => (+) a b for expressionsia : b => (:) a b for patterns(a) => a for patterns[\j]^_`abcdekflmginop[\j]^_`abcdekflmginop None9The 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$q7Compile the given pattern against the given expression.r"Compile a pattern variable e.g. x.sCompile a record field pattern.t-Compile a literal value from a pattern match.u#Compile as binding in pattern matchv%Compile a pattern match on a newtype.wCompile a pattern application.xCompile a pattern list.qrstuvwxqrstuvwxqrstuvwx/NoneyPrint the JS to a flat string.z Print the JS to a pretty string.{EEncode String to JS-format lterals. Could use the Text.JSON library.|Prints 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)}Print a list of statements.~Unqualify a JsName.'Print a constructor name given a QName.Print an unqualified name.<Print a constructor name given a Name. Helper for printCons.bWords reserved in haskell as well are not needed here: case, class, do, else, if, import, in, leteThis 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.3Normalize the given name to JavaScript-valid names.Intercalate monoids. Print one of the kinds of names.Print an expression.Print a module path.Print a single statement./Print special constructors (tuples, list, etc.)#Print (and properly encode) a name.Print module name.3Print (and properly encode to JS) a qualified name.Print literals.yz{|}~yz{|}~yz{|}~0None$:LKCompile 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$9;<=Compile 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$9;<=Compile 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$L$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 !"$9;<=T >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!"$9;<= \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{|}~xr      )    ! p " h h # i i $ %1&2'5()*+, - . / 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 l m n o p q r s t u v w x y z { | } ~    W      !"#$%&'&(&)&*&+&,&-&./012345678797:;<=>?@ABCDEFGHIJKLMNOPQRSRTRURVWXYZ[\]^_^`^a^b^c^d^e^f^g^h^i^j^k^lmnmompmqmrstuvwxwywzw{w|w}w~wwwwwwmmmmmm^^^^^^^^^^^^^^      !"#$%&'()*+,-./0/1/1232425262778797:7;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYRZR[R\R]R^R_R`abcdefghijklmnopqrstuvwxyz{|}~&      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMN78O:PQ<RSTUVWXYZ[\]^_`abcdefghijklmnopqrstuuMvtwxyz{|}~tt{                     !!!{!|"""""""###$$$$$$$$$$$%%%%%''''''''''''''''''''''''''''''''''''(((((( ))))) ) ) ) ) ))))))))))))))))))) )!)")#)$)%)&)')()))**+*,*-*.*/*0*1*2*3*4*5*6*7*8*9*:*;*+*<*=+>+?+@+A+B+C+D+E,F,F,G,H,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.l.m.n/o/p/q/r/s/t/u/v/w/x/y/z/{/|/}/~///////000000000000000000000011111111111111111111111122222223334555556666666 $fay-0.23.1.15-Hwog3aNG5RK9IHkQgOZyC1 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 resImportedresSourceMappings$fShowCompileResultparseFaydefaultExtensions 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 ParseErrorShouldBeDesugaredUnableResolveQualifiedUnsupportedDeclarationUnsupportedEnumUnsupportedExportSpecUnsupportedExpressionUnsupportedFieldPatternUnsupportedImportUnsupportedLetUnsupportedLetBindingUnsupportedLiteralUnsupportedModuleSyntaxUnsupportedPatternUnsupportedQualStmtUnsupportedRecursiveDoUnsupportedRhsUnsupportedWhereInAltUnsupportedWhereInMatch$fShowCompileErrorConfigconfigOptimizeconfigFlattenAppsconfigExportRuntimeconfigExportStdlibconfigExportStdlibOnlyconfigPrettyPrintconfigHtmlWrapperconfigSourceMapconfigHtmlJSLibs configLibrary configWarnconfigFilePathconfigTypecheck configWallconfigGClosureconfigPackageConfconfigBasePath configStrictconfigTypecheckOnlyconfigRuntimePathconfigOptimizeNewtypesconfigPrettyThunksconfigPrettyOperatorsconfigShowGhcCalls defaultConfigdefaultConfigWithSandboxconfigDirectoryIncludesconfigDirectoryIncludePaths%nonPackageConfigDirectoryIncludePathsaddConfigDirectoryIncludeaddConfigDirectoryIncludesaddConfigDirectoryIncludePathsconfigPackagesaddConfigPackageaddConfigPackagesshouldExportStrictWrapper$fDefaultConfig $fShowConfig CompileModuleCompile unCompile CompileReader readerConfigreaderCompileLitreaderCompileDecls CompileWriter writerCons writerFayToJs writerJsToFay CompileStatestateInterfacesstateRecordTypes stateRecords stateNewtypes stateImportedstateNameDepthstateModuleNamestateJsModulePathsstateUseFromString stateTypeSigs$fMonadModuleCompile$fMonoidCompileWriter$fShowCompileState$fShowCompileWriter$fApplicativeCompile$fFunctorCompile$fMonadCompile$fMonadErrorCompile$fMonadIOCompile$fMonadReaderCompile$fMonadStateCompile$fMonadWriterCompile$fApplicativeFay $fFunctorFay $fMonadFayrunCompileModuledesugardesugar'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$fGTraversablecUnpackedness$fGTraversablecResultSig$fGTraversablecInjectivityInfo 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-primGHC.PrimseqGHC.Listfilterzip System.IOprint Data.Tuplefstsnd otherwisemap$GHC.Real fromIntegral realToFracjoinGHC.EnumBoundedminBoundmaxBoundEnumenumFrom enumFromThenenumFromThenTo enumFromTofromEnumtoEnumsuccpred GHC.ClassesEq==/= GHC.FloatFloatingpilogsqrt**logBasesincostanasinacosatansinhcoshtanhasinhacoshatanh Fractional fromRational/recipIntegral toIntegerquotremdivquotRemdivModMonad>>=>>returnfail Data.DataDatagfoldlgunfoldtoConstr dataTypeOf dataCast1 dataCast2gmapTgmapQlgmapQrgmapQgmapQigmapMgmapMpgmapMoFunctorfmap<$GHC.NumNum*+-negate fromIntegerabssignumOrd>=minmax><<=compareGHC.ReadReadreadList readsPrecReal toRational RealFloat floatRadix floatDigits floatRange decodeFloat encodeFloatexponent significand scaleFloatisNaN isInfiniteisDenormalizedisNegativeZeroisIEEEatan2RealFracproperFractiontruncateroundceilingfloorGHC.ShowShow showsPrecshowshowListData.Typeable.InternalTypeable Applicativepure<*>*><* Data.FoldableFoldablefoldl'foldrlengthfoldMapnullfoldlfoldl1sumproductfoldr1maximumminimumelemData.Traversable TraversabletraversemapM sequenceAsequenceMonoidmemptymappendmconcat GHC.TypesBoolFalseTrueCharDoubleFloatInt integer-gmpGHC.Integer.TypeIntegerMaybeNothingJustOrderingLTEQGTRationalIOWord Data.EitherEitherLeftRight Data.Functor<$> Data.Monoid<>String GHC.UnicodeisSpaceisAlphaisDigit Text.Readread Alternativeemptymany<|>some MonadPlusmzeromplus Data.ListisSubsequenceOf Control.Monadmfilter<$!>unless replicateM_ replicateMfoldM_foldM zipWithM_zipWithM mapAndUnzipMforever<=<>=>filterMfoldMapDefault fmapDefault mapAccumR mapAccumLforMforControl.Applicativeoptional WrappedMonad WrapMonad unwrapMonad WrappedArrow WrapArrow unwrapArrowZipList getZipList Control.Arrowfirstsecond***&&&|||+++readIOreadLn appendFile writeFilereadFileinteract getContentsgetLinegetCharputStrLnputStrputCharreadsGHC.IO.ExceptionioErrorData.Functor.ConstConstgetConstfindnotElem minimumBy maximumByallanyorand concatMapconcatmsum sequence_forM_mapM_GHC.IOFilePath userErrorIOErrorisRightisLeftpartitionEithersrightsleftseither Data.OldListunwordswordsunlineslinesunfoldrsortOnsortBysort permutations subsequencestailsinitsgroupBygroupdeleteFirstsByunzip7unzip6unzip5unzip4zipWith7zipWith6zipWith5zipWith4zip7zip6zip5zip4genericReplicate genericIndexgenericSplitAt genericDrop genericTake genericLengthinsertByinsert partition transpose intercalate intersperse intersectBy intersectunionByunion\\deleteBydeletenubBynub isInfixOf isSuffixOf isPrefixOf findIndices findIndex elemIndices elemIndex stripPrefix dropWhileEndData.Ord comparingDown Data.Char isSeparatorisNumberisMarkisLetter digitToInt readLitChar lexLitCharlex readParenText.ParserCombinators.ReadPReadS Data.FunctiononvoidtoTitletoUppertoLowerisLowerisUpperisPrint isControl isAlphaNumisSymbol isPunctuation isHexDigit isOctDigit isAsciiUpper isAsciiLowerisLatin1isAsciigeneralCategorylcmgcd^^^oddevenGHC.Charchr intToDigit showLitChar showParen showStringshowCharshowsShowSunzip3unzipzipWith3zipWithzip3!!lookupreversebreakspansplitAtdroptake dropWhile takeWhilecycle replicaterepeatiteratescanr1scanrscanl'scanl1scanlfoldl1'initlasttailunconshead Data.MaybemapMaybe catMaybes listToMaybe maybeToList fromMaybefromJust isNothingisJustmaybeuncurrycurrysubtractasTypeOfuntil$!flip.constidordapliftM5liftM4liftM3liftM2liftMwhen=<<liftA3liftA2liftA<**>GHC.Err undefinederrorWithoutStackTraceerror&&||not!safe-0.3.9-Hqo3JhJes6h6KTrVZw55PbSafe 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-0.6-C65vWCsht6A8uLstpQIXyjData.Generics.AliasesextQextRparseDataOrTuple parseTuple parseObject makeSimple makeRecord parseFloat parseDoubleparseInt parseBool parseString parseChar parseText parseArray parseUnit GenericParser encodeGeneric lookupField parseUTCTimebadData justRightModuleTModName MonadModule getModuleInfoControl.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 initialScopemergeLocalScopesrmap2traverse-with-class-0.2.0.4-29flKh81XzlATxY7DyE4EfData.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_configPackagesresolvePackagesresolvePackagedoesSourceDirExistdescribePackagepackageVersion getShareGen liftModuleTthunk 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 checkEnumdesugarImplicitPreludedesugarToplevelFFITypeSigsdesugarInfixOp.haskell-src-exts-1.18.2-9JBcaPyJNc23w8BJK1Oi0TLanguage.Haskell.Exts.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