packages feed

hjs 0.2 → 0.2.1

raw patch · 64 files changed

+238/−15637 lines, 64 filesdep +arraydep +bytestringdep +containersdep ~basenew-uploaderbinary-added

Dependencies added: array, bytestring, containers, directory

Dependency ranges changed: base

Files

− .setup-config
@@ -1,1 +0,0 @@-LocalBuildInfo {prefix = "C:\\Program Files", bindir = "$prefix\\Haskell\\bin", libdir = "$prefix\\Haskell", libsubdir = "$pkgid\\$compiler", libexecdir = "$prefix\\$pkgid", datadir = "$prefix\\Haskell", datasubdir = "$pkgid", compiler = Compiler {compilerFlavor = GHC, compilerVersion = Version {versionBranch = [6,6], versionTags = []}, compilerPath = "C:\\Software\\haskell\\ghc-6.6.0\\bin\\ghc.exe", compilerPkgTool = "C:\\Software\\haskell\\ghc-6.6.0\\bin\\ghc-pkg.exe"}, buildDir = "dist\\build", packageDeps = [PackageIdentifier {pkgName = "base", pkgVersion = Version {versionBranch = [2,0], versionTags = []}},PackageIdentifier {pkgName = "parsec", pkgVersion = Version {versionBranch = [2,0], versionTags = []}},PackageIdentifier {pkgName = "mtl", pkgVersion = Version {versionBranch = [1,0], versionTags = []}},PackageIdentifier {pkgName = "regex-compat", pkgVersion = Version {versionBranch = [0,71], versionTags = []}}], withPrograms = [("ar",Program {programName = "ar", programBinName = "ar", programArgs = [], programLocation = FoundOnSystem "C:\\Software\\haskell\\ghc-6.6.0\\bin\\ar.exe"}),("haddock",Program {programName = "haddock", programBinName = "haddock", programArgs = [], programLocation = EmptyLocation}),("pfesetup",Program {programName = "pfesetup", programBinName = "pfesetup", programArgs = [], programLocation = EmptyLocation}),("ranlib",Program {programName = "ranlib", programBinName = "ranlib", programArgs = [], programLocation = EmptyLocation}),("runghc",Program {programName = "runghc", programBinName = "runghc", programArgs = [], programLocation = FoundOnSystem "C:\\Software\\haskell\\ghc-6.6.0\\bin\\runghc.exe"}),("runhugs",Program {programName = "runhugs", programBinName = "runhugs", programArgs = [], programLocation = FoundOnSystem "c:\\software\\hugs98\\runhugs.exe"})], userConf = False, withHappy = Just "C:\\Software\\haskell\\happy\\happy-1.16\\happy.exe", withAlex = Just "C:\\Software\\haskell\\alex\\alex-2.1.0\\alex.exe", withHsc2hs = Just "C:\\Software\\haskell\\ghc-6.6.0\\bin\\hsc2hs.exe", withC2hs = Nothing, withCpphs = Nothing, withGreencard = Nothing, withVanillaLib = True, withProfLib = False, withProfExe = False, withGHCiLib = True, splitObjs = False}
+ ECMA-262.pdf view

binary file changed (absent → 720951 bytes)

− Setup.hi

binary file changed (304 → absent bytes)

− Setup.o

binary file changed (1577 → absent bytes)

− doc/ECMA-262.pdf

binary file changed (720951 → absent bytes)

− doc/HJS-Interpreter-Host.html
@@ -1,166 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Interpreter.Host</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Interpreter.Host</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AgetArgs"
-></A
-><B
->getArgs</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> [<A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
->]</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Aprint%27"
-></A
-><B
->print'</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AputBuiltIn"
-></A
-><B
->putBuiltIn</B
-> :: Int -&gt; String -&gt; [String] -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AobjectConstructor"
-></A
-><B
->objectConstructor</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AaddBuiltIn"
-></A
-><B
->addBuiltIn</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/HJS-Interpreter-Interp.html
@@ -1,558 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Interpreter.Interp</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Interpreter.Interp</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AMyError"
-></A
-><B
->MyError</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ANoMsg"
-></A
-><B
->NoMsg</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AMsg"
-></A
-><B
->Msg</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:MyError')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:MyError" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Error <A HREF="HJS-Interpreter-Interp.html#t%3AMyError"
->MyError</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-Interp.html#t%3AMyError"
->MyError</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->class</SPAN
-> <A NAME="t%3AInterpC"
-></A
-><B
->InterpC</B
-> t  <SPAN CLASS="keyword"
->where</SPAN
-></TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="section4"
->Methods</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Ainterp"
-></A
-><B
->interp</B
-> :: t -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:InterpC')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:InterpC" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitAnd"
->BitAnd</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitOR"
->BitOR</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitXOR"
->BitXOR</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACallExpr"
->CallExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACondE"
->CondE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AFuncDecl"
->FuncDecl</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AIfStmt"
->IfStmt</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AItStmt"
->ItStmt</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AJSProgram"
->JSProgram</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALeftExpr"
->LeftExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALiteral"
->Literal</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogAnd"
->LogAnd</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogOr"
->LogOr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->MemberExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ANewExpr"
->NewExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->Null</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3APostFix"
->PostFix</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3APrimExpr"
->PrimExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AVarDecl"
->VarDecl</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> a =&gt; <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> (Maybe a)</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> a =&gt; <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> [a]</TD
-></TR
-><TR
-><TD CLASS="decl"
->(<A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> t1, <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> t2) =&gt; <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> (Either t1 t2)</TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AinterpList"
-></A
-><B
->interpList</B
-> :: <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> a =&gt; [a] -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AliftIt"
-></A
-><B
->liftIt</B
-> :: (<A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->SubType</A
-> sub <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
->, <A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->SubType</A
-> sub1 <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
->, <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> t1, <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> t) =&gt; (sub -&gt; sub1 -&gt; Int) -&gt; t -&gt; t1 -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AliftIt3"
-></A
-><B
->liftIt3</B
-> :: (<A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->SubType</A
-> sub <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
->, <A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->SubType</A
-> sub1 <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
->) =&gt; (sub -&gt; sub1 -&gt; Int) -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/HJS-Interpreter-InterpM.html
@@ -1,1562 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Interpreter.InterpM</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Interpreter.InterpM</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->class</SPAN
-> <A NAME="t%3AConvert"
-></A
-><B
->Convert</B
-> a  <SPAN CLASS="keyword"
->where</SPAN
-></TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="section4"
->Methods</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AtoBoolean"
-></A
-><B
->toBoolean</B
-> :: a -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AtoNumber"
-></A
-><B
->toNumber</B
-> :: a -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AtoString"
-></A
-><B
->toString</B
-> :: a -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AisUndefined"
-></A
-><B
->isUndefined</B
-> :: a -&gt; Bool</TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Convert')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Convert" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> Bool</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ABreakContinue"
->BreakContinue</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ACallValue"
->CallValue</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> Int</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->Null</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ARef"
->Ref</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> String</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AUndefined"
->Undefined</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> [Int]</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> [<A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
->]</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> [String]</TD
-></TR
-><TR
-><TD CLASS="decl"
->(<A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> a, <A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> b) =&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> (Either a b)</TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->class</SPAN
-> <A NAME="t%3ASubType"
-></A
-><B
->SubType</B
-> sub sup  <SPAN CLASS="keyword"
->where</SPAN
-></TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="section4"
->Methods</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Ainj"
-></A
-><B
->inj</B
-> :: sub -&gt; sup</TD
-></TR
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Aprj"
-></A
-><B
->prj</B
-> :: sup -&gt; Maybe sub</TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:SubType')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:SubType" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->SubType</A
-> sub ()</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->SubType</A
-> a (Either a b)</TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->SubType</A
-> a b =&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->SubType</A
-> a (Either c b)</TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AtoRealInt"
-></A
-><B
->toRealInt</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> a =&gt; a -&gt; Int</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AtoRealString"
-></A
-><B
->toRealString</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> a =&gt; a -&gt; String</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AtoRealBool"
-></A
-><B
->toRealBool</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> a =&gt; a -&gt; Bool</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ARef"
-></A
-><B
->Ref</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ARef"
-></A
-><B
->Ref</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ARefObj"
-></A
-><B
->RefObj</B
-> Int String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Ref')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Ref" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ARef"
->Ref</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Eq <A HREF="HJS-Interpreter-InterpM.html#t%3ARef"
->Ref</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Ord <A HREF="HJS-Interpreter-InterpM.html#t%3ARef"
->Ref</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-InterpM.html#t%3ARef"
->Ref</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AUndefined"
-></A
-><B
->Undefined</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AUndefined"
-></A
-><B
->Undefined</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Undefined')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Undefined" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AUndefined"
->Undefined</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Eq <A HREF="HJS-Interpreter-InterpM.html#t%3AUndefined"
->Undefined</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Ord <A HREF="HJS-Interpreter-InterpM.html#t%3AUndefined"
->Undefined</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-InterpM.html#t%3AUndefined"
->Undefined</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ANull"
-></A
-><B
->Null</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ANull"
-></A
-><B
->Null</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Null')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Null" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->Null</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Eq <A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->Null</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->Null</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Ord <A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->Null</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->Null</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ACallValue"
-></A
-><B
->CallValue</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACallJS"
-></A
-><B
->CallJS</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACallBuiltIn"
-></A
-><B
->CallBuiltIn</B
-> (<A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
->)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:CallValue')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:CallValue" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ACallValue"
->CallValue</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Eq <A HREF="HJS-Interpreter-InterpM.html#t%3ACallValue"
->CallValue</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Ord <A HREF="HJS-Interpreter-InterpM.html#t%3ACallValue"
->CallValue</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-InterpM.html#t%3ACallValue"
->CallValue</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ABreakContinue"
-></A
-><B
->BreakContinue</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABreak"
-></A
-><B
->Break</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AContinue"
-></A
-><B
->Continue</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:BreakContinue')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:BreakContinue" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3ABreakContinue"
->BreakContinue</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Eq <A HREF="HJS-Interpreter-InterpM.html#t%3ABreakContinue"
->BreakContinue</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Ord <A HREF="HJS-Interpreter-InterpM.html#t%3ABreakContinue"
->BreakContinue</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-InterpM.html#t%3ABreakContinue"
->BreakContinue</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AArgList"
-></A
-><B
->ArgList</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AArgList"
-></A
-><B
->ArgList</B
-> [String]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AVarArgList"
-></A
-><B
->VarArgList</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3AValue"
-></A
-><B
->Value</B
-> = Either Int (Either String (Either Bool (Either <A HREF="HJS-Interpreter-InterpM.html#t%3AUndefined"
->Undefined</A
-> (Either <A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->Null</A
-> (Either <A HREF="HJS-Interpreter-InterpM.html#t%3ARef"
->Ref</A
-> (Either [Int] (Either <A HREF="HJS-Interpreter-InterpM.html#t%3ACallValue"
->CallValue</A
-> (Either [String] (Either <A HREF="HJS-Interpreter-InterpM.html#t%3ABreakContinue"
->BreakContinue</A
-> ())))))))))</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AAttribute"
-></A
-><B
->Attribute</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AReadOnly"
-></A
-><B
->ReadOnly</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ADontEnum"
-></A
-><B
->DontEnum</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ADontDelete"
-></A
-><B
->DontDelete</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AInternal"
-></A
-><B
->Internal</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Attribute')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Attribute" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Eq <A HREF="HJS-Interpreter-InterpM.html#t%3AAttribute"
->Attribute</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-InterpM.html#t%3AAttribute"
->Attribute</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AObject"
-></A
-><B
->Object</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="5" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AObject"
-></A
-><B
->Object</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="body" COLSPAN="2"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Aprototype"
-></A
-><B
->prototype</B
-> :: (Maybe Int)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Aklass"
-></A
-><B
->klass</B
-> :: String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Avalue"
-></A
-><B
->value</B
-> :: (Maybe <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
->)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Aproperties"
-></A
-><B
->properties</B
-> :: (Map String (<A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
->, [<A HREF="HJS-Interpreter-InterpM.html#t%3AAttribute"
->Attribute</A
->]))</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Object')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Object" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AgetObject"
-></A
-><B
->getObject</B
-> :: Int -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AputObject"
-></A
-><B
->putObject</B
-> :: Int -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AgetProperty%27"
-></A
-><B
->getProperty'</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
-> -&gt; String -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AgetProperty"
-></A
-><B
->getProperty</B
-> :: Int -&gt; String -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AputProperty"
-></A
-><B
->putProperty</B
-> :: Int -&gt; String -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AcanPut"
-></A
-><B
->canPut</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
-> -&gt; String -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> Bool</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AhasProperty"
-></A
-><B
->hasProperty</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
-> -&gt; String -&gt; Bool</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AdeleteProperty"
-></A
-><B
->deleteProperty</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
-> -&gt; String -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AnewObject"
-></A
-><B
->newObject</B
-> :: String -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> Int</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AgetValue"
-></A
-><B
->getValue</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AgetValue%27"
-></A
-><B
->getValue'</B
-> :: [Int] -&gt; String -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AputValue"
-></A
-><B
->putValue</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AnewBuiltInFunction"
-></A
-><B
->newBuiltInFunction</B
-> :: [String] -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> Int</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3ACtx"
-></A
-><B
->Ctx</B
-> = ([Int], Int, Int)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3AJSState"
-></A
-><B
->JSState</B
-> = ([<A HREF="HJS-Interpreter-InterpM.html#t%3ACtx"
->Ctx</A
->], Map Int <A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->Object</A
->)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AThrowable"
-></A
-><B
->Throwable</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowReturn"
-></A
-><B
->ThrowReturn</B
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowBreak"
-></A
-><B
->ThrowBreak</B
-> (Maybe String)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowContinue"
-></A
-><B
->ThrowContinue</B
-> (Maybe String)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowException"
-></A
-><B
->ThrowException</B
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowTypeError"
-></A
-><B
->ThrowTypeError</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowInternalError"
-></A
-><B
->ThrowInternalError</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Throwable')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Throwable" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Error <A HREF="HJS-Interpreter-InterpM.html#t%3AThrowable"
->Throwable</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Interpreter-InterpM.html#t%3AThrowable"
->Throwable</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3AInterpM"
-></A
-><B
->InterpM</B
-> = ErrorT <A HREF="HJS-Interpreter-InterpM.html#t%3AThrowable"
->Throwable</A
-> (StateT <A HREF="HJS-Interpreter-InterpM.html#t%3AJSState"
->JSState</A
-> Identity)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AputGlobalContext"
-></A
-><B
->putGlobalContext</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3ApushContext"
-></A
-><B
->pushContext</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3ACtx"
->Ctx</A
-> -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3ApopContext"
-></A
-><B
->popContext</B
-> :: <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/HJS-Interpreter-Object.html
@@ -1,82 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Interpreter.Object</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Interpreter.Object</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/HJS-Interpreter.html
@@ -1,118 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Interpreter</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Interpreter</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3ArunInterp"
-></A
-><B
->runInterp</B
-> :: <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> p =&gt; p -&gt; <A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->InterpM</A
-> <A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->Value</A
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3ArunProgram"
-></A
-><B
->runProgram</B
-> :: <A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> a =&gt; Bool -&gt; a -&gt; IO Bool</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/HJS-Parser-JavaScript.html
@@ -1,3790 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Parser.JavaScript</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Parser.JavaScript</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->class</SPAN
-> <A NAME="t%3AEmitHaskell"
-></A
-><B
->EmitHaskell</B
-> a  <SPAN CLASS="keyword"
->where</SPAN
-></TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="s8"
-></TD
-></TR
-><TR
-><TD CLASS="section4"
->Methods</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AeHs"
-></A
-><B
->eHs</B
-> :: a -&gt; String</TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ALiteral"
-></A
-><B
->Literal</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALitInt"
-></A
-><B
->LitInt</B
-> Int</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALitString"
-></A
-><B
->LitString</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Literal')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Literal" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALiteral"
->Literal</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ALiteral"
->Literal</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3APrimExpr"
-></A
-><B
->PrimExpr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALiteral"
-></A
-><B
->Literal</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALiteral"
->Literal</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AIdent"
-></A
-><B
->Ident</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABrack"
-></A
-><B
->Brack</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThis"
-></A
-><B
->This</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ARegex"
-></A
-><B
->Regex</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AArray"
-></A
-><B
->Array</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AArrayLit"
->ArrayLit</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AObject"
-></A
-><B
->Object</B
-> [Either (<A HREF="HJS-Parser-JavaScript.html#t%3APropName"
->PropName</A
->, <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
->) <A HREF="HJS-Parser-JavaScript.html#t%3AGetterPutter"
->GetterPutter</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:PrimExpr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:PrimExpr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3APrimExpr"
->PrimExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3APrimExpr"
->PrimExpr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AGetterPutter"
-></A
-><B
->GetterPutter</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AGetterPutter"
-></A
-><B
->GetterPutter</B
-> String <A HREF="HJS-Parser-JavaScript.html#t%3AFuncDecl"
->FuncDecl</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3APutter"
-></A
-><B
->Putter</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AFuncDecl"
->FuncDecl</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:GetterPutter')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:GetterPutter" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AGetterPutter"
->GetterPutter</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3APropName"
-></A
-><B
->PropName</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3APropNameId"
-></A
-><B
->PropNameId</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3APropNameStr"
-></A
-><B
->PropNameStr</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3APropNameInt"
-></A
-><B
->PropNameInt</B
-> Int</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:PropName')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:PropName" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3APropName"
->PropName</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AArrayLit"
-></A
-><B
->ArrayLit</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AArrSimple"
-></A
-><B
->ArrSimple</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:ArrayLit')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:ArrayLit" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AArrayLit"
->ArrayLit</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AMemberExpr"
-></A
-><B
->MemberExpr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AMemPrimExpr"
-></A
-><B
->MemPrimExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3APrimExpr"
->PrimExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AArrayExpr"
-></A
-><B
->ArrayExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->MemberExpr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AMemberNew"
-></A
-><B
->MemberNew</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->MemberExpr</A
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AMemberCall"
-></A
-><B
->MemberCall</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->MemberExpr</A
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:MemberExpr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:MemberExpr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->MemberExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->MemberExpr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ACallExpr"
-></A
-><B
->CallExpr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACallMember"
-></A
-><B
->CallMember</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->MemberExpr</A
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACallCall"
-></A
-><B
->CallCall</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACallExpr"
->CallExpr</A
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACallSquare"
-></A
-><B
->CallSquare</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACallExpr"
->CallExpr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACallDot"
-></A
-><B
->CallDot</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACallExpr"
->CallExpr</A
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:CallExpr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:CallExpr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACallExpr"
->CallExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ACallExpr"
->CallExpr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ANewExpr"
-></A
-><B
->NewExpr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AMemberExpr"
-></A
-><B
->MemberExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->MemberExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ANewNewExpr"
-></A
-><B
->NewNewExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ANewExpr"
->NewExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:NewExpr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:NewExpr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ANewExpr"
->NewExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ANewExpr"
->NewExpr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ALeftExpr"
-></A
-><B
->LeftExpr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ANewExpr"
-></A
-><B
->NewExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ANewExpr"
->NewExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACallExpr"
-></A
-><B
->CallExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACallExpr"
->CallExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:LeftExpr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:LeftExpr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALeftExpr"
->LeftExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ALeftExpr"
->LeftExpr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3APostFix"
-></A
-><B
->PostFix</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALeftExpr"
-></A
-><B
->LeftExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALeftExpr"
->LeftExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3APostInc"
-></A
-><B
->PostInc</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALeftExpr"
->LeftExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3APostDec"
-></A
-><B
->PostDec</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALeftExpr"
->LeftExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:PostFix')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:PostFix" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3APostFix"
->PostFix</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3APostFix"
->PostFix</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AUExpr"
-></A
-><B
->UExpr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3APostFix"
-></A
-><B
->PostFix</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3APostFix"
->PostFix</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ADelete"
-></A
-><B
->Delete</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AVoid"
-></A
-><B
->Void</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ATypeOf"
-></A
-><B
->TypeOf</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ADoublePlus"
-></A
-><B
->DoublePlus</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ADoubleMinus"
-></A
-><B
->DoubleMinus</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AUnaryPlus"
-></A
-><B
->UnaryPlus</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AUnaryMinus"
-></A
-><B
->UnaryMinus</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ANot"
-></A
-><B
->Not</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABitNot"
-></A
-><B
->BitNot</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:UExpr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:UExpr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AMultExpr"
-></A
-><B
->MultExpr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AUExpr"
-></A
-><B
->UExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ATimes"
-></A
-><B
->Times</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ADiv"
-></A
-><B
->Div</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AMod"
-></A
-><B
->Mod</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->UExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:MultExpr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:MultExpr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AAddExpr"
-></A
-><B
->AddExpr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AMultExpr"
-></A
-><B
->MultExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3APlus"
-></A
-><B
->Plus</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AMinus"
-></A
-><B
->Minus</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->MultExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:AddExpr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:AddExpr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AShiftE"
-></A
-><B
->ShiftE</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAddExpr"
-></A
-><B
->AddExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AShiftLeft"
-></A
-><B
->ShiftLeft</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AShiftRight"
-></A
-><B
->ShiftRight</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AShiftRight2"
-></A
-><B
->ShiftRight2</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->AddExpr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:ShiftE')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:ShiftE" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ARelE"
-></A
-><B
->RelE</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AShiftE"
-></A
-><B
->ShiftE</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALessThan"
-></A
-><B
->LessThan</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AGreaterThan"
-></A
-><B
->GreaterThan</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALessEqual"
-></A
-><B
->LessEqual</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AGreaterEqual"
-></A
-><B
->GreaterEqual</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AInstanceOf"
-></A
-><B
->InstanceOf</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AInObject"
-></A
-><B
->InObject</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->ShiftE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:RelE')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:RelE" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AEqualE"
-></A
-><B
->EqualE</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ARelE"
-></A
-><B
->RelE</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AEqual"
-></A
-><B
->Equal</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ANotEqual"
-></A
-><B
->NotEqual</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AEqual2"
-></A
-><B
->Equal2</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ANotEqual2"
-></A
-><B
->NotEqual2</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->RelE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:EqualE')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:EqualE" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ABitAnd"
-></A
-><B
->BitAnd</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AEqualE"
-></A
-><B
->EqualE</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABABitAnd"
-></A
-><B
->BABitAnd</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitAnd"
->BitAnd</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->EqualE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:BitAnd')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:BitAnd" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitAnd"
->BitAnd</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ABitAnd"
->BitAnd</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ABitXOR"
-></A
-><B
->BitXOR</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABitAnd"
-></A
-><B
->BitAnd</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitAnd"
->BitAnd</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABXBitXOR"
-></A
-><B
->BXBitXOR</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitXOR"
->BitXOR</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitAnd"
->BitAnd</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:BitXOR')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:BitXOR" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitXOR"
->BitXOR</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ABitXOR"
->BitXOR</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ABitOR"
-></A
-><B
->BitOR</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABitXOR"
-></A
-><B
->BitXOR</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitXOR"
->BitXOR</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABOBitOR"
-></A
-><B
->BOBitOR</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitOR"
->BitOR</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitXOR"
->BitXOR</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:BitOR')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:BitOR" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitOR"
->BitOR</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ABitOR"
->BitOR</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ALogAnd"
-></A
-><B
->LogAnd</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABitOR"
-></A
-><B
->BitOR</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitOR"
->BitOR</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALALogAnd"
-></A
-><B
->LALogAnd</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogAnd"
->LogAnd</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ABitOR"
->BitOR</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:LogAnd')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:LogAnd" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogAnd"
->LogAnd</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ALogAnd"
->LogAnd</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ALogOr"
-></A
-><B
->LogOr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALogAnd"
-></A
-><B
->LogAnd</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogAnd"
->LogAnd</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALOLogOr"
-></A
-><B
->LOLogOr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogOr"
->LogOr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogAnd"
->LogAnd</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:LogOr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:LogOr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogOr"
->LogOr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ALogOr"
->LogOr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ACondE"
-></A
-><B
->CondE</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALogOr"
-></A
-><B
->LogOr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogOr"
->LogOr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACondIf"
-></A
-><B
->CondIf</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALogOr"
->LogOr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:CondE')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:CondE" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACondE"
->CondE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ACondE"
->CondE</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AAssignOp"
-></A
-><B
->AssignOp</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAssignNormal"
-></A
-><B
->AssignNormal</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAssignOpMult"
-></A
-><B
->AssignOpMult</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAssignOpDiv"
-></A
-><B
->AssignOpDiv</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAssignOpMod"
-></A
-><B
->AssignOpMod</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAssignOpPlus"
-></A
-><B
->AssignOpPlus</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAssignOpMinus"
-></A
-><B
->AssignOpMinus</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:AssignOp')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:AssignOp" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AAssignOp"
->AssignOp</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AAssignE"
-></A
-><B
->AssignE</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACondE"
-></A
-><B
->CondE</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACondE"
->CondE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAssign"
-></A
-><B
->Assign</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ALeftExpr"
->LeftExpr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAssignOp"
->AssignOp</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAEFuncDecl"
-></A
-><B
->AEFuncDecl</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AFuncDecl"
->FuncDecl</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:AssignE')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:AssignE" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AExpr"
-></A
-><B
->Expr</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AAssignE"
-></A
-><B
->AssignE</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Expr')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Expr" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AVarDecl"
-></A
-><B
->VarDecl</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AVarDecl"
-></A
-><B
->VarDecl</B
-> String (Maybe <A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->AssignE</A
->)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:VarDecl')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:VarDecl" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AVarDecl"
->VarDecl</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AVarDecl"
->VarDecl</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AIfStmt"
-></A
-><B
->IfStmt</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AIfElse"
-></A
-><B
->IfElse</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AIfOnly"
-></A
-><B
->IfOnly</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AIf2"
-></A
-><B
->If2</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AIf3"
-></A
-><B
->If3</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:IfStmt')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:IfStmt" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AIfStmt"
->IfStmt</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AIfStmt"
->IfStmt</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AItStmt"
-></A
-><B
->ItStmt</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ADoWhile"
-></A
-><B
->DoWhile</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AWhile"
-></A
-><B
->While</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AFor"
-></A
-><B
->For</B
-> (Maybe <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
->) (Maybe <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
->) (Maybe <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
->) <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AForVar"
-></A
-><B
->ForVar</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AVarDecl"
->VarDecl</A
->] (Maybe <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
->) (Maybe <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
->) <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AForIn"
-></A
-><B
->ForIn</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AVarDecl"
->VarDecl</A
->] <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AIt2"
-></A
-><B
->It2</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:ItStmt')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:ItStmt" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AItStmt"
->ItStmt</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AItStmt"
->ItStmt</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ATryStmt"
-></A
-><B
->TryStmt</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ATryBC"
-></A
-><B
->TryBC</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->] [<A HREF="HJS-Parser-JavaScript.html#t%3ACatch"
->Catch</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ATryBF"
-></A
-><B
->TryBF</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->] [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ATryBCF"
-></A
-><B
->TryBCF</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->] [<A HREF="HJS-Parser-JavaScript.html#t%3ACatch"
->Catch</A
->] [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:TryStmt')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:TryStmt" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ATryStmt"
->TryStmt</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ACatch"
-></A
-><B
->Catch</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACatch"
-></A
-><B
->Catch</B
-> String [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACatchIf"
-></A
-><B
->CatchIf</B
-> String [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->] <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Catch')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Catch" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ACatch"
->Catch</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AStmt"
-></A
-><B
->Stmt</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AIfStmt"
-></A
-><B
->IfStmt</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AIfStmt"
->IfStmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AEmptyStmt"
-></A
-><B
->EmptyStmt</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AExprStmt"
-></A
-><B
->ExprStmt</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AItStmt"
-></A
-><B
->ItStmt</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AItStmt"
->ItStmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABlock"
-></A
-><B
->Block</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AVarStmt"
-></A
-><B
->VarStmt</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AVarDecl"
->VarDecl</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ATryStmt"
-></A
-><B
->TryStmt</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ATryStmt"
->TryStmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AContStmt"
-></A
-><B
->ContStmt</B
-> (Maybe String)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ABreakStmt"
-></A
-><B
->BreakStmt</B
-> (Maybe String)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AReturnStmt"
-></A
-><B
->ReturnStmt</B
-> (Maybe <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
->)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AWithStmt"
-></A
-><B
->WithStmt</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALabelledStmt"
-></A
-><B
->LabelledStmt</B
-> String <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ASwitch"
-></A
-><B
->Switch</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3ASwitch"
->Switch</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowExpr"
-></A
-><B
->ThrowExpr</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Stmt')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Stmt" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ASwitch"
-></A
-><B
->Switch</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ASSwitch"
-></A
-><B
->SSwitch</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ACaseBlock"
->CaseBlock</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Switch')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Switch" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ASwitch"
->Switch</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ACaseBlock"
-></A
-><B
->CaseBlock</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACaseBlock"
-></A
-><B
->CaseBlock</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3ACaseClause"
->CaseClause</A
->] [<A HREF="HJS-Parser-JavaScript.html#t%3ADefaultClause"
->DefaultClause</A
->] [<A HREF="HJS-Parser-JavaScript.html#t%3ACaseClause"
->CaseClause</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:CaseBlock')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:CaseBlock" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ACaseBlock"
->CaseBlock</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ACaseClause"
-></A
-><B
->CaseClause</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ACaseClause"
-></A
-><B
->CaseClause</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->Expr</A
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:CaseClause')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:CaseClause" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ACaseClause"
->CaseClause</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ADefaultClause"
-></A
-><B
->DefaultClause</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ADefaultClause"
-></A
-><B
->DefaultClause</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:DefaultClause')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:DefaultClause" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ADefaultClause"
->DefaultClause</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AFuncDecl"
-></A
-><B
->FuncDecl</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AFuncDecl"
-></A
-><B
->FuncDecl</B
-> (Maybe String) [String] [<A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:FuncDecl')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:FuncDecl" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AFuncDecl"
->FuncDecl</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AFuncDecl"
->FuncDecl</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ASourceElement"
-></A
-><B
->SourceElement</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AStmt"
-></A
-><B
->Stmt</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->Stmt</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ASEFuncDecl"
-></A
-><B
->SEFuncDecl</B
-> <A HREF="HJS-Parser-JavaScript.html#t%3AFuncDecl"
->FuncDecl</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:SourceElement')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:SourceElement" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Eq <A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Ord <A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->Convert</A
-> [<A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
->]</TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AJSProgram"
-></A
-><B
->JSProgram</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AJSProgram"
-></A
-><B
->JSProgram</B
-> [<A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->SourceElement</A
->]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:JSProgram')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:JSProgram" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->InterpC</A
-> <A HREF="HJS-Parser-JavaScript.html#t%3AJSProgram"
->JSProgram</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-JavaScript.html#t%3AJSProgram"
->JSProgram</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/HJS-Parser-LexerM.html
@@ -1,114 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Parser.LexerM</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Parser.LexerM</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Alexer"
-></A
-><B
->lexer</B
-> :: String -&gt; (Token, String)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AlexerM"
-></A
-><B
->lexerM</B
-> :: Int -&gt; (Token -&gt; <A HREF="HJS-Parser-ParserMonad.html#t%3AP"
->P</A
-> a) -&gt; <A HREF="HJS-Parser-ParserMonad.html#t%3AP"
->P</A
-> a</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/HJS-Parser-ParserMonad.html
@@ -1,439 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Parser.ParserMonad</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Parser.ParserMonad</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AParseResult"
-></A
-><B
->ParseResult</B
-> a</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AOk"
-></A
-><B
->Ok</B
-> a</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AFailed"
-></A
-><B
->Failed</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:ParseResult')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:ParseResult" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show a =&gt; Show (<A HREF="HJS-Parser-ParserMonad.html#t%3AParseResult"
->ParseResult</A
-> a)</TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ALexerMode"
-></A
-><B
->LexerMode</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ANormal"
-></A
-><B
->Normal</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AInComment"
-></A
-><B
->InComment</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AInRegex"
-></A
-><B
->InRegex</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:LexerMode')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:LexerMode" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-ParserMonad.html#t%3ALexerMode"
->LexerMode</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3ALexerState"
-></A
-><B
->LexerState</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="5" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3ALS"
-></A
-><B
->LS</B
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="body" COLSPAN="2"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Arest"
-></A
-><B
->rest</B
-> :: String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Alineno"
-></A
-><B
->lineno</B
-> :: Int</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Amode"
-></A
-><B
->mode</B
-> :: <A HREF="HJS-Parser-ParserMonad.html#t%3ALexerMode"
->LexerMode</A
-></TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Atr"
-></A
-><B
->tr</B
-> :: [String]</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Anl"
-></A
-><B
->nl</B
-> :: Bool</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3Arest2"
-></A
-><B
->rest2</B
-> :: String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AexpectRegex"
-></A
-><B
->expectRegex</B
-> :: Bool</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AlastToken"
-></A
-><B
->lastToken</B
-> :: (Maybe Token)</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:LexerState')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:LexerState" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Show <A HREF="HJS-Parser-ParserMonad.html#t%3ALexerState"
->LexerState</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3AP"
-></A
-><B
->P</B
-> = StateT <A HREF="HJS-Parser-ParserMonad.html#t%3ALexerState"
->LexerState</A
-> (ErrorT String Identity)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AgetLineNo"
-></A
-><B
->getLineNo</B
-> :: <A HREF="HJS-Parser-ParserMonad.html#t%3AP"
->P</A
-> Int</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AputLineNo"
-></A
-><B
->putLineNo</B
-> :: Int -&gt; <A HREF="HJS-Parser-ParserMonad.html#t%3AP"
->P</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Atrace"
-></A
-><B
->trace</B
-> :: String -&gt; <A HREF="HJS-Parser-ParserMonad.html#t%3AP"
->P</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/HJS-Parser-Regex.html
@@ -1,82 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->HJS.Parser.Regex</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->HJS.Parser.Regex</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/Main.html
@@ -1,121 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->Main</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->Main</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Description</TD
-></TR
-><TR
-><TD CLASS="doc"
->HJS Haskell Javascript Interpreter 
- (c) Mark Wassell 2007
- See LICENSE file for license details
-</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Alexer"
-></A
-><B
->lexer</B
-> :: String -&gt; (Token, String)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3AparseFile"
-></A
-><B
->parseFile</B
-> :: [VFlag] -&gt; String -&gt; IO ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/T.html
@@ -1,221 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->T</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->T</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3ACtx"
-></A
-><B
->Ctx</B
-> = ([Int], Int, Int)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3AJSState"
-></A
-><B
->JSState</B
-> = [Int]</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->data</SPAN
-> <A NAME="t%3AThrowable"
-></A
-><B
->Throwable</B
-> </TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="section4"
->Constructors</TD
-></TR
-><TR
-><TD CLASS="body"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowReturn"
-></A
-><B
->ThrowReturn</B
-> Int</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-><TR
-><TD CLASS="arg"
-><A NAME="v%3AThrowError"
-></A
-><B
->ThrowError</B
-> String</TD
-><TD CLASS="rdoc"
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section4"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:Throwable')" ALT="show/hide"
-> Instances</TD
-></TR
-><TR
-><TD CLASS="body"
-><DIV ID="i:Throwable" STYLE="display:block;"
-><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0"
-><TR
-><TD CLASS="decl"
->Error <A HREF="T.html#t%3AThrowable"
->Throwable</A
-></TD
-></TR
-><TR
-><TD CLASS="decl"
->Show <A HREF="T.html#t%3AThrowable"
->Throwable</A
-></TD
-></TR
-></TABLE
-></DIV
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3AInterpM"
-></A
-><B
->InterpM</B
-> = StateT <A HREF="T.html#t%3AJSState"
->JSState</A
-> (ErrorT <A HREF="T.html#t%3AThrowable"
->Throwable</A
-> Identity)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Adoit"
-></A
-><B
->doit</B
-> :: <A HREF="T.html#t%3AInterpM"
->InterpM</A
-> ()</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/T2.html
@@ -1,128 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
->T2</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="modulebar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><FONT SIZE="6"
->T2</FONT
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Documentation</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><SPAN CLASS="keyword"
->type</SPAN
-> <A NAME="t%3AIM"
-></A
-><B
->IM</B
-> = StateT String (ErrorT String Identity)</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Adoit3"
-></A
-><B
->doit3</B
-> :: <A HREF="T2.html#t%3AIM"
->IM</A
-> String</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="decl"
-><A NAME="v%3Adoit"
-></A
-><B
->doit</B
-> :: <A HREF="T2.html#t%3AIM"
->IM</A
-> String</TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-A.html
@@ -1,330 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (A)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->AEFuncDecl</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAEFuncDecl"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->AddExpr</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AAddExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAddExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->ArgList</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AArgList"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AArgList"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ArrSimple</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AArrSimple"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Array</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AArray"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ArrayExpr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AArrayExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ArrayLit</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AArrayLit"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Assign</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAssign"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->AssignE</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AAssignE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAssignE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->AssignNormal</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAssignNormal"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->AssignOp</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AAssignOp"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->AssignOpDiv</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAssignOpDiv"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->AssignOpMinus</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAssignOpMinus"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->AssignOpMod</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAssignOpMod"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->AssignOpMult</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAssignOpMult"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->AssignOpPlus</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AAssignOpPlus"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Attribute</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AAttribute"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->addBuiltIn</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Host.html#v%3AaddBuiltIn"
->HJS.Interpreter.Host</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->autoSemiInsert</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-LexerM.html#v%3AautoSemiInsert"
->HJS.Parser.LexerM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-B.html
@@ -1,274 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (B)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->BABitAnd</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABABitAnd"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->BOBitOR</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABOBitOR"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->BXBitXOR</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABXBitXOR"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->BitAnd</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ABitAnd"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABitAnd"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->BitNot</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABitNot"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->BitOR</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ABitOR"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABitOR"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->BitXOR</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ABitXOR"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABitXOR"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Block</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABlock"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Brack</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABrack"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Break</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ABreak"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->BreakContinue</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ABreakContinue"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->BreakStmt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ABreakStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-C.html
@@ -1,366 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (C)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->CallBuiltIn</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ACallBuiltIn"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->CallCall</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACallCall"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->CallDot</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACallDot"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->CallExpr</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ACallExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACallExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->CallJS</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ACallJS"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->CallMember</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACallMember"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->CallSquare</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACallSquare"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->CallValue</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ACallValue"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->CaseBlock</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ACaseBlock"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACaseBlock"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->CaseClause</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ACaseClause"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACaseClause"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Catch</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ACatch"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACatch"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->CatchIf</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACatchIf"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->CondE</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ACondE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACondE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->CondIf</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ACondIf"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ContStmt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AContStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Continue</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AContinue"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Convert</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AConvert"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Ctx</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ACtx"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="T.html#t%3ACtx"
->T</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->canPut</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AcanPut"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-D.html
@@ -1,254 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (D)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->DefaultClause</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ADefaultClause"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ADefaultClause"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Delete</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ADelete"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Div</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ADiv"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->DoWhile</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ADoWhile"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->DontDelete</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ADontDelete"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->DontEnum</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ADontEnum"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->DoubleMinus</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ADoubleMinus"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->DoublePlus</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ADoublePlus"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->deleteProperty</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AdeleteProperty"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->doit</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Function)</TD
-><TD CLASS="indexlinks"
-><A HREF="T.html#v%3Adoit"
->T</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Function)</TD
-><TD CLASS="indexlinks"
-><A HREF="T2.html#v%3Adoit"
->T2</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->doit3</TD
-><TD CLASS="indexlinks"
-><A HREF="T2.html#v%3Adoit3"
->T2</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-E.html
@@ -1,226 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (E)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->EmitHaskell</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AEmitHaskell"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->EmptyStmt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AEmptyStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Equal</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AEqual"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Equal2</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AEqual2"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->EqualE</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AEqualE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AEqualE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Expr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ExprStmt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AExprStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->eHs</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AeHs"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->expectRegex</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3AexpectRegex"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-F.html
@@ -1,194 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (F)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->Failed</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3AFailed"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->For</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AFor"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ForIn</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AForIn"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ForVar</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AForVar"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->FuncDecl</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AFuncDecl"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AFuncDecl"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-G.html
@@ -1,234 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (G)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->GetterPutter</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AGetterPutter"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AGetterPutter"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->GreaterEqual</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AGreaterEqual"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->GreaterThan</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AGreaterThan"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->getArgs</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Host.html#v%3AgetArgs"
->HJS.Interpreter.Host</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->getLineNo</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3AgetLineNo"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->getObject</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AgetObject"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->getProperty</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AgetProperty"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->getProperty'</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AgetProperty%27"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->getValue</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AgetValue"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->getValue'</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AgetValue%27"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-H.html
@@ -1,150 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (H)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->hasProperty</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AhasProperty"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-I.html
@@ -1,338 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (I)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->IM</TD
-><TD CLASS="indexlinks"
-><A HREF="T2.html#t%3AIM"
->T2</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Ident</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AIdent"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->If2</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AIf2"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->If3</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AIf3"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->IfElse</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AIfElse"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->IfOnly</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AIfOnly"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->IfStmt</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AIfStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AIfStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->InComment</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3AInComment"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->InObject</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AInObject"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->InRegex</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3AInRegex"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->InstanceOf</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AInstanceOf"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Internal</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AInternal"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->InterpC</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Interp.html#t%3AInterpC"
->HJS.Interpreter.Interp</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->InterpM</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AInterpM"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="T.html#t%3AInterpM"
->T</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->It2</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AIt2"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->ItStmt</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AItStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AItStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->inj</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3Ainj"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->interp</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Interp.html#v%3Ainterp"
->HJS.Interpreter.Interp</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->interpList</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Interp.html#v%3AinterpList"
->HJS.Interpreter.Interp</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->isUndefined</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AisUndefined"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-J.html
@@ -1,182 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (J)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->JSProgram</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AJSProgram"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AJSProgram"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->JSState</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AJSState"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="T.html#t%3AJSState"
->T</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-K.html
@@ -1,150 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (K)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->klass</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3Aklass"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-L.html
@@ -1,352 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (L)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->LALogAnd</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALALogAnd"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LOLogOr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALOLogOr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LS</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3ALS"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LabelledStmt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALabelledStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->LeftExpr</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ALeftExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALeftExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LessEqual</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALessEqual"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LessThan</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALessThan"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LexerMode</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#t%3ALexerMode"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LexerState</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#t%3ALexerState"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LitInt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALitInt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->LitString</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALitString"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Literal</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ALiteral"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALiteral"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->LogAnd</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ALogAnd"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALogAnd"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->LogOr</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ALogOr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ALogOr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->lastToken</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3AlastToken"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->lexer</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-LexerM.html#v%3Alexer"
->HJS.Parser.LexerM</A
->, <A HREF="Main.html#v%3Alexer"
->Main</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->lexerM</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-LexerM.html#v%3AlexerM"
->HJS.Parser.LexerM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->liftIt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Interp.html#v%3AliftIt"
->HJS.Interpreter.Interp</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->liftIt3</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Interp.html#v%3AliftIt3"
->HJS.Interpreter.Interp</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->lineno</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3Alineno"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-M.html
@@ -1,254 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (M)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->MemPrimExpr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AMemPrimExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->MemberCall</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AMemberCall"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->MemberExpr</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AMemberExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AMemberExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->MemberNew</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AMemberNew"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Minus</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AMinus"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Mod</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AMod"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Msg</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Interp.html#v%3AMsg"
->HJS.Interpreter.Interp</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->MultExpr</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AMultExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AMultExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->MyError</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Interp.html#t%3AMyError"
->HJS.Interpreter.Interp</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->main</TD
-><TD CLASS="indexlinks"
-><A HREF="Main.html#v%3Amain"
->Main</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->mode</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3Amode"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-N.html
@@ -1,254 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (N)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->NewExpr</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ANewExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ANewExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->NewNewExpr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ANewNewExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->NoMsg</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Interp.html#v%3ANoMsg"
->HJS.Interpreter.Interp</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Normal</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3ANormal"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Not</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ANot"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->NotEqual</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ANotEqual"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->NotEqual2</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ANotEqual2"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Null</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ANull"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ANull"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->newBuiltInFunction</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AnewBuiltInFunction"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->newObject</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AnewObject"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->nl</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3Anl"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-O.html
@@ -1,186 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (O)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Object</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AObject"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AObject"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->3 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AObject"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Ok</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3AOk"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->objectConstructor</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Host.html#v%3AobjectConstructor"
->HJS.Interpreter.Host</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-P.html
@@ -1,378 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (P)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->P</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#t%3AP"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ParseResult</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#t%3AParseResult"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Plus</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3APlus"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->PostDec</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3APostDec"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->PostFix</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3APostFix"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3APostFix"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->PostInc</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3APostInc"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->PrimExpr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3APrimExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->PropName</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3APropName"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->PropNameId</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3APropNameId"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->PropNameInt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3APropNameInt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->PropNameStr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3APropNameStr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Putter</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3APutter"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->parseFile</TD
-><TD CLASS="indexlinks"
-><A HREF="Main.html#v%3AparseFile"
->Main</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->parseProgram</TD
-><TD CLASS="indexlinks"
-><A HREF="Main.html#v%3AparseProgram"
->Main</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->parseRegex</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-Regex.html#v%3AparseRegex"
->HJS.Parser.Regex</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->parseTest</TD
-><TD CLASS="indexlinks"
-><A HREF="Main.html#v%3AparseTest"
->Main</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->popContext</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ApopContext"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->print'</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Host.html#v%3Aprint%27"
->HJS.Interpreter.Host</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->prj</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3Aprj"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->properties</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3Aproperties"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->prototype</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3Aprototype"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->pushContext</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ApushContext"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->putBuiltIn</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-Host.html#v%3AputBuiltIn"
->HJS.Interpreter.Host</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->putGlobalContext</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AputGlobalContext"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->putLineNo</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3AputLineNo"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->putObject</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AputObject"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->putProperty</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AputProperty"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->putValue</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AputValue"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-R.html
@@ -1,246 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (R)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->ReadOnly</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AReadOnly"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Ref</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ARef"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ARef"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->RefObj</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3ARefObj"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Regex</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ARegex"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->RelE</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ARelE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ARelE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ReturnStmt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AReturnStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->rest</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3Arest"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->rest2</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3Arest2"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->runInterp</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter.html#v%3ArunInterp"
->HJS.Interpreter</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->runProgram</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter.html#v%3ArunProgram"
->HJS.Interpreter</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-S.html
@@ -1,258 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (S)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->SEFuncDecl</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ASEFuncDecl"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->SSwitch</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ASSwitch"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->ShiftE</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AShiftE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AShiftE"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ShiftLeft</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AShiftLeft"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ShiftRight</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AShiftRight"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ShiftRight2</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AShiftRight2"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->SourceElement</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ASourceElement"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Stmt</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->SubType</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3ASubType"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Switch</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ASwitch"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ASwitch"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-T.html
@@ -1,378 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (T)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->This</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AThis"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ThrowBreak</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AThrowBreak"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ThrowContinue</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AThrowContinue"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ThrowError</TD
-><TD CLASS="indexlinks"
-><A HREF="T.html#v%3AThrowError"
->T</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ThrowException</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AThrowException"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ThrowExpr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AThrowExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ThrowInternalError</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AThrowInternalError"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->ThrowReturn</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AThrowReturn"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="T.html#v%3AThrowReturn"
->T</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->ThrowTypeError</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AThrowTypeError"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Throwable</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AThrowable"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="T.html#t%3AThrowable"
->T</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Times</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ATimes"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->TryBC</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ATryBC"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->TryBCF</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ATryBCF"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->TryBF</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ATryBF"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->TryStmt</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3ATryStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ATryStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->TypeOf</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3ATypeOf"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->t</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-Regex.html#v%3At"
->HJS.Parser.Regex</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->toBoolean</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AtoBoolean"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->toNumber</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AtoNumber"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->toRealBool</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AtoRealBool"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->toRealInt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AtoRealInt"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->toRealString</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AtoRealString"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->toString</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AtoString"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->tr</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3Atr"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->trace</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-ParserMonad.html#v%3Atrace"
->HJS.Parser.ParserMonad</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-U.html
@@ -1,198 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (U)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->UExpr</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AUExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AUExpr"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->UnaryMinus</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AUnaryMinus"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->UnaryPlus</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AUnaryPlus"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->Undefined</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AUndefined"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AUndefined"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-V.html
@@ -1,202 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (V)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->Value</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#t%3AValue"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->VarArgList</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3AVarArgList"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry" COLSPAN="2"
->VarDecl</TD
-></TR
-><TR
-><TD CLASS="indexannot"
->1 (Type/Class)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#t%3AVarDecl"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexannot"
->2 (Data Constructor)</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AVarDecl"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->VarStmt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AVarStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->Void</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AVoid"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->value</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Interpreter-InterpM.html#v%3Avalue"
->HJS.Interpreter.InterpM</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index-W.html
@@ -1,158 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index (W)</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD CLASS="indexentry"
->While</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AWhile"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-><TR
-><TD CLASS="indexentry"
->WithStmt</TD
-><TD CLASS="indexlinks"
-><A HREF="HJS-Parser-JavaScript.html#v%3AWithStmt"
->HJS.Parser.JavaScript</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/doc-index.html
@@ -1,136 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-> (Index)</TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Index</TD
-></TR
-><TR
-><TD
-><TABLE CELLPADDING="0" CELLSPACING="5"
-><TR
-><TD
-><A HREF="doc-index-A.html"
->A</A
-></TD
-><TD
-><A HREF="doc-index-B.html"
->B</A
-></TD
-><TD
-><A HREF="doc-index-C.html"
->C</A
-></TD
-><TD
-><A HREF="doc-index-D.html"
->D</A
-></TD
-><TD
-><A HREF="doc-index-E.html"
->E</A
-></TD
-><TD
-><A HREF="doc-index-F.html"
->F</A
-></TD
-><TD
-><A HREF="doc-index-G.html"
->G</A
-></TD
-><TD
-><A HREF="doc-index-H.html"
->H</A
-></TD
-><TD
-><A HREF="doc-index-I.html"
->I</A
-></TD
-><TD
-><A HREF="doc-index-J.html"
->J</A
-></TD
-><TD
-><A HREF="doc-index-K.html"
->K</A
-></TD
-><TD
-><A HREF="doc-index-L.html"
->L</A
-></TD
-><TD
-><A HREF="doc-index-M.html"
->M</A
-></TD
-><TD
-><A HREF="doc-index-N.html"
->N</A
-></TD
-><TD
-><A HREF="doc-index-O.html"
->O</A
-></TD
-><TD
-><A HREF="doc-index-P.html"
->P</A
-></TD
-><TD
-><A HREF="doc-index-R.html"
->R</A
-></TD
-><TD
-><A HREF="doc-index-S.html"
->S</A
-></TD
-><TD
-><A HREF="doc-index-T.html"
->T</A
-></TD
-><TD
-><A HREF="doc-index-U.html"
->U</A
-></TD
-><TD
-><A HREF="doc-index-V.html"
->V</A
-></TD
-><TD
-><A HREF="doc-index-W.html"
->W</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/haddock.css
@@ -1,235 +0,0 @@-/* -------- Global things --------- */--BODY { -  background-color: #ffffff;-  color: #000000;-  font-family: sans-serif;-  } --A:link    { color: #0000e0; text-decoration: none }-A:visited { color: #0000a0; text-decoration: none }-A:hover   { background-color: #e0e0ff; text-decoration: none }--TABLE.vanilla {-  width: 100%;-  border-width: 0px;-  /* I can't seem to specify cellspacing or cellpadding properly using CSS... */-}--TABLE.vanilla2 {-  border-width: 0px;-}--/* <TT> font is a little too small in MSIE */-TT  { font-size: 100%; }-PRE { font-size: 100%; }--LI P { margin: 0pt } --TD {-  border-width: 0px;-}--TABLE.narrow {-  border-width: 0px;-}--TD.s8  {  height: 8px;  }-TD.s15 {  height: 15px; }--SPAN.keyword { text-decoration: underline; }--/* Resize the buttom image to match the text size */-IMG.coll { width : 0.75em; height: 0.75em; margin-bottom: 0; margin-right: 0.5em }--/* --------- Contents page ---------- */--DIV.node {-  padding-left: 3em;-}--DIV.cnode {-  padding-left: 1.75em;-}--SPAN.pkg {-  position: absolute;-  left: 50em;-}--/* --------- Documentation elements ---------- */--TD.children {-  padding-left: 25px;-  }--TD.synopsis {-  padding: 2px;-  background-color: #f0f0f0;-  font-family: monospace- }--TD.decl { -  padding: 2px;-  background-color: #f0f0f0; -  font-family: monospace;-  vertical-align: top;-  }--/* -  arg is just like decl, except that wrapping is not allowed.  It is-  used for function and constructor arguments which have a text box-  to the right, where if wrapping is allowed the text box squashes up-  the declaration by wrapping it.-*/-TD.arg { -  padding: 2px;-  background-color: #f0f0f0; -  font-family: monospace;-  vertical-align: top;-  white-space: nowrap;-  }--TD.recfield { padding-left: 20px }--TD.doc  { -  padding-top: 2px;-  padding-left: 10px;-  }--TD.ndoc  { -  padding: 2px;-  }--TD.rdoc  { -  padding: 2px;-  padding-left: 10px;-  width: 100%;-  }--TD.body  { -  padding-left: 10px-  }--TD.pkg {-  width: 100%;-  padding-left: 10px-}--TD.indexentry {-  vertical-align: top;-  padding-right: 10px-  }--TD.indexannot {-  vertical-align: top;-  padding-left: 20px;-  white-space: nowrap-  }--TD.indexlinks {-  width: 100%-  }--/* ------- Section Headings ------- */--TD.section1 {-  padding-top: 15px;-  font-weight: bold;-  font-size: 150%-  }--TD.section2 {-  padding-top: 10px;-  font-weight: bold;-  font-size: 130%-  }--TD.section3 {-  padding-top: 5px;-  font-weight: bold;-  font-size: 110%-  }--TD.section4 {-  font-weight: bold;-  font-size: 100%-  }--/* -------------- The title bar at the top of the page */--TD.infohead {-  color: #ffffff;-  font-weight: bold;-  padding-right: 10px;-  text-align: left;-}--TD.infoval {-  color: #ffffff;-  padding-right: 10px;-  text-align: left;-}--TD.topbar {-  background-color: #000099;-  padding: 5px;-}--TD.title {-  color: #ffffff;-  padding-left: 10px;-  width: 100%-  }--TD.topbut {-  padding-left: 5px;-  padding-right: 5px;-  border-left-width: 1px;-  border-left-color: #ffffff;-  border-left-style: solid;-  white-space: nowrap;-  }--TD.topbut A:link {-  color: #ffffff-  }--TD.topbut A:visited {-  color: #ffff00-  }--TD.topbut A:hover {-  background-color: #6060ff;-  }--TD.topbut:hover {-  background-color: #6060ff-  }--TD.modulebar { -  background-color: #0077dd;-  padding: 5px;-  border-top-width: 1px;-  border-top-color: #ffffff;-  border-top-style: solid;-  }--/* --------- The page footer --------- */--TD.botbar {-  background-color: #000099;-  color: #ffffff;-  padding: 5px-  }-TD.botbar A:link {-  color: #ffffff;-  text-decoration: underline-  }-TD.botbar A:visited {-  color: #ffff00-  }-TD.botbar A:hover {-  background-color: #6060ff-  }-
− doc/haddock.js
@@ -1,15 +0,0 @@-// Haddock JavaScript utilities-function toggle(button,id)-{-   var n = document.getElementById(id).style;-   if (n.display == "none")-   {-	button.src = "minus.gif";-	n.display = "block";-   }-   else-   {-	button.src = "plus.gif";-	n.display = "none";-   }-}
− doc/haskell_icon.gif

binary file changed (911 → absent bytes)

− doc/index.html
@@ -1,215 +0,0 @@-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
-<!--Rendered using the Haskell Html Library v0.2-->
-<HTML
-><HEAD
-><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8"
-><TITLE
-></TITLE
-><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css"
-><SCRIPT SRC="haddock.js" TYPE="text/javascript"
-></SCRIPT
-></HEAD
-><BODY
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD CLASS="topbar"
-><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD
-><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" "
-></TD
-><TD CLASS="title"
-></TD
-><TD CLASS="topbut"
-><A HREF="index.html"
->Contents</A
-></TD
-><TD CLASS="topbut"
-><A HREF="doc-index.html"
->Index</A
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="section1"
->Modules</TD
-></TR
-><TR
-><TD
-><TABLE CLASS="vanilla2" CELLSPACING="0" CELLPADDING="0"
-><TR
-><TD STYLE="width: 50em"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'n:0')" ALT="show/hide"
->HJS</TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding: 0; padding-left: 2em" COLSPAN="3"
-><TABLE CLASS="vanilla2" CELLSPACING="0" CELLPADDING="0" ID="n:0" STYLE="display:block;"
-><TR
-><TD STYLE="width: 48em"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'n:1')" ALT="show/hide"
-><A HREF="HJS-Interpreter.html"
->HJS.Interpreter</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding: 0; padding-left: 2em" COLSPAN="3"
-><TABLE CLASS="vanilla2" CELLSPACING="0" CELLPADDING="0" ID="n:1" STYLE="display:block;"
-><TR
-><TD STYLE="padding-left: 1.25em;width: 46em"
-><A HREF="HJS-Interpreter-Host.html"
->HJS.Interpreter.Host</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 46em"
-><A HREF="HJS-Interpreter-Interp.html"
->HJS.Interpreter.Interp</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 46em"
-><A HREF="HJS-Interpreter-InterpM.html"
->HJS.Interpreter.InterpM</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 46em"
-><A HREF="HJS-Interpreter-Object.html"
->HJS.Interpreter.Object</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD STYLE="width: 48em"
-><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'n:2')" ALT="show/hide"
->Parser</TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding: 0; padding-left: 2em" COLSPAN="3"
-><TABLE CLASS="vanilla2" CELLSPACING="0" CELLPADDING="0" ID="n:2" STYLE="display:block;"
-><TR
-><TD STYLE="padding-left: 1.25em;width: 46em"
-><A HREF="HJS-Parser-JavaScript.html"
->HJS.Parser.JavaScript</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 46em"
-><A HREF="HJS-Parser-LexerM.html"
->HJS.Parser.LexerM</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 46em"
-><A HREF="HJS-Parser-ParserMonad.html"
->HJS.Parser.ParserMonad</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 46em"
-><A HREF="HJS-Parser-Regex.html"
->HJS.Parser.Regex</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-></TABLE
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 50em"
-><A HREF="Main.html"
->Main</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 50em"
-><A HREF="T.html"
->T</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-><TR
-><TD STYLE="padding-left: 1.25em;width: 50em"
-><A HREF="T2.html"
->T2</A
-></TD
-><TD
-></TD
-><TD
-></TD
-></TR
-></TABLE
-></TD
-></TR
-><TR
-><TD CLASS="s15"
-></TD
-></TR
-><TR
-><TD CLASS="botbar"
->Produced by <A HREF="http://www.haskell.org/haddock/"
->Haddock</A
-> version 0.7</TD
-></TR
-></TABLE
-></BODY
-></HTML
->
− doc/minus.gif

binary file changed (56 → absent bytes)

− doc/plus.gif

binary file changed (59 → absent bytes)

hjs.cabal view
@@ -1,21 +1,91 @@-Name:           hjs
-Version:        0.2
-Copyright:      Mark Wassell 2007
-License:        BSD3
-license-file:	LICENSE
-Author:         Mark Wassell<mwassell@bigpond.net.au>
-Maintainer:     mwassell@bigpond.net.au
-Stability:	experimental
-Homepage:       http://www.haskell.org/haskellwiki/Libraries_and_tools/HJS
-Category:       Compilers/Interpreters
-Build-Depends:  base,parsec>=2.0,mtl,regex-compat>=0.71
-Synopsis:       Javascript Parser
-Description:
-          A Javascript parser and interpreter.
-          Works as per ECMA-262 plus some parts of JS >=1.5.
+Name:          hjs
+Version:       0.2.1
+Copyright:     Mark Wassell 2007
+License:       BSD3
+license-file:  LICENSE
+Author:        Mark Wassell
+Maintainer:    Mark Wassell <mwassell@bigpond.net.au>
 
-Executable: 	hjs
-Extensions: OverlappingInstances,UndecidableInstances
-Main-Is: 	Main.hs
-Hs-Source-Dirs:	src
+Stability:     Experimental
+Category:      Compilers/Interpreters
+Synopsis:      JavaScript Parser
+Description:   A Javascript parser and interpreter.
+               Works as per ECMA-262 plus some parts of JS >=1.5.
+Homepage:      http://www.haskell.org/haskellwiki/Libraries_and_tools/HJS
 
+Build-Type:    Simple
+Cabal-Version: >= 1.2
+Tested-With:   GHC==6.8.2
+
+Data-files:         ECMA-262.pdf, TODO, README, AUTHORS
+Extra-source-files: src/HJS/Interpreter/T.hs,
+                    testsuite/9_functions.js, testsuite/12_funcs_ackermann.js,
+                    testsuite/16_funcs.js, testsuite/inherit.html
+                    testsuite/36_throw.js, testsuite/19_func_body.js,
+                    testsuite/35_throw.js, testsuite/16_literals.js,
+                    testsuite/25_regex.js, testsuite/97_funcproto.js,
+                    testsuite/13_cast.js, testsuite/67_method.js,
+                    testsuite/26_regex.js, testsuite/x.html
+                    testsuite/17_funcs_caller.js, testsuite/0_helloworld.js,
+                    testsuite/parsingonly/06_callexpr.js,
+                    testsuite/parsingonly/06_var.js, testsuite/parsingonly/10_switch.js,
+                    testsuite/parsingonly/120_js.js, testsuite/parsingonly/16_literals.js,
+                    testsuite/parsingonly/00_f.js, testsuite/parsingonly/js.html
+                    testsuite/parsingonly/5_comments.js, testsuite/parsingonly/07_expr.js,
+                    testsuite/parsingonly/130_htojs.js, testsuite/parsingonly/01_semi1.js,
+                    testsuite/parsingonly/06_newexpr.js, testsuite/parsingonly/05_regex.js,
+                    testsuite/parsingonly/121_jsdefs.js, testsuite/parsingonly/errorline13.js,
+                    testsuite/parsingonly/05_comments_simple.js, testsuite/parsingonly/110_perfect.js,
+                    testsuite/parsingonly/123_jsparse.js, testsuite/parsingonly/122_jsexec.js,
+                    testsuite/parsingonly/02_sm.js, testsuite/parsingonly/67_bob.js,
+                    testsuite/parsingonly/101_inheritance.js, testsuite/parsingonly/41_functions.js,
+                    testsuite/parsingonly/15_literals.js, testsuite/parsingonly/14_labelled_stmts.js,
+                    testsuite/parsingonly/03_sm.js, testsuite/parsingonly/25_trycatch.js,
+                    testsuite/parsingonly/130s.js, testsuite/parsingonly/1_simple.js,
+                    testsuite/parsingonly/40_functions.js, testsuite/parsingonly/02_semicolon.js,
+                    testsuite/parsingonly/fn.js, testsuite/parsingonly/06_block.js,
+                    testsuite/parsingonly/20_statements.js, testsuite/parsingonly/04_if.js,
+                    testsuite/14_new.js, testsuite/100_animals.js,
+                    testsuite/34_throw.js, testsuite/23_switch.js,
+                    testsuite/10_expressions.js, testsuite/101_inheritance.js,
+                    testsuite/101a_in.js, testsuite/21_print.js,
+                    testsuite/18_funcs_apply.js, testsuite/79_throw.js,
+                    testsuite/15_tostring.js, testsuite/12_array.js,
+                    testsuite/12_iter.js, testsuite/5_object.js,
+                    testsuite/90_class.js, testsuite/24_switch.js,
+                    testsuite/11_funcs_factorial.js, testsuite/6_this.js,
+                    testsuite/56_arguments.js, testsuite/99_all.js
+
+Library
+        Hs-source-dirs:  src
+        Exposed-Modules: HJS.Interpreter.Array
+                         HJS.Interpreter.String,
+                         HJS.Interpreter.Error,
+                         HJS.Interpreter.Debugger,
+                         HJS.Interpreter.Printf,
+                         HJS.Interpreter.ObjectBasic,
+                         HJS.Interpreter.Interp,
+                         HJS.Interpreter.VarArgs,
+                         HJS.Interpreter.InterpMDecl,
+                         HJS.Interpreter.Regex,
+                         HJS.Interpreter.Function,
+                         HJS.Interpreter.Host,
+                         HJS.Interpreter.Object,
+                         HJS.Interpreter.InterpM,
+                         HJS.Interpreter.Eval,
+                         HJS.Interpreter,
+                         HJS.Parser.Prim,
+                         HJS.Parser.Utils,
+                         HJS.Parser.JavaScript,
+                         HJS.Parser.Lexer,
+                         HJS.Parser.JavaScriptParser,
+                         HJS.Parser
+        Build-Depends: base>=3, parsec>=2.0, mtl, regex-compat>=0.71, containers,
+                       array, directory, bytestring
+        Extensions:     OverlappingInstances, PatternSignatures, MultiParamTypeClasses,
+                        FlexibleInstances, TypeSynonymInstances, UndecidableInstances
+        GHC-Options:    -Wall
+
+Executable          hjs
+    Main-Is:        Main.hs
+    Hs-Source-Dirs: src
− makedoc.bat
@@ -1,2 +0,0 @@-cd src
-C:\Software\haskell\haddock-0.7\haddock -v -o ..\doc -h *.hs .\HJS\Parser\JavaScript.hs .\HJS\Parser\LexerM.hs .\HJS\Parser\ParserMonad.hs .\HJS\Parser\Regex.hs .\HJS\Interpreter.hs .\HJS\Interpreter\*.hs
− src/HJS/Interpreter.hs~
@@ -1,60 +0,0 @@-module HJS.Interpreter where
-
-import Control.Monad.Identity
-import Control.Monad.Error
-import Control.Monad.State
-
-import qualified Data.Map as M
-
-import HJS.Interpreter.InterpMDecl
-import HJS.Interpreter.InterpM
-import HJS.Interpreter.Interp
-import HJS.Interpreter.Host
-
-runInterp :: InterpC p => p -> InterpM Value
-runInterp p = do
-	          initEnvironment
---                  addBuiltIn
-                  interp p
-                 
-
-runProgram' p = runIdentity $ runStateT  (runErrorT (runInterp p)) emptyState 
-
-runProgram :: InterpC a => Bool -> a  -> IO Bool
-runProgram flags  p = do 
-                           let (ret,state) = runProgram' p
-			   case ret of 
-                                 Left err -> do let (_,_,pos) = state
-                                                putStrLn $ "Position: " ++ (show pos) 
-                                                putStrLn (show err ) 
-                                                handleRunResult flags (undefinedValue, state)
-                                 Right r  -> handleRunResult flags (r,state)
-
-handleRunResult True (v,(ec,s,p)) = do 
- 				              let out = getOut s
-					      putStrLn $ "Return: " ++ (show v)
-                                              putStrLn $ "Output: " ++ (show out)
-                                              putStrLn $ "Execution Context" ++ (show ec)
-					      putStrLn $ "Heap: "
-				              mapM_ (\(i,o) -> do 
-                                                  putStr  $ (show i) ++ " ->  "
-						  putStrLn (show o)) (M.toList s)
-                                              case (prj v) of 
-                                                   (Just b :: Maybe Bool) -> return b
-                                                   _ -> return False
-
-
-
-handleRunResult False (v,(ec,s,p)) = do
- 				              let out = getOut s
-                                              case out of 
-                                                   Nothing -> return ()
-					           (Just out') -> putStrLn $ "Output: " ++ (show out')
-					      case (prj v) of 
-                                                   (Just b :: Maybe Bool) -> return b
-                                                   _ -> return False
-
-getOut s = out where (out::Maybe String) = do  
-	                                     go <- M.lookup globalObj s
-                                             (o,_) <- M.lookup "_output" (properties go)
-                                             return $ show o
− src/HJS/Interpreter/Debugger.hs~
@@ -1,5 +0,0 @@-{--
-  A Simple Debugger for HJS
---}
-module HJS.Interpreter.Debugger where
-
− src/HJS/Interpreter/Eval.hs~
@@ -1,5 +0,0 @@-module HJS.Interpreter.Eval where
-
-eval :: String -> InterpM Value
-eval s = do
-            
− src/HJS/Interpreter/Host.hs~
@@ -1,107 +0,0 @@-{-# OPTIONS -fglasgow-exts #-}
-{-# OPTIONS -fallow-overlapping-instances  #-}
-{-# OPTIONS -fallow-incoherent-instances #-}
-{-
-        Built in functions provided by 'host' 
--}
-module HJS.Interpreter.Host where
-
-
-
-import HJS.Interpreter.InterpMDecl
-import HJS.Interpreter.InterpM
-import HJS.Interpreter.Interp
-
-import HJS.Interpreter.ObjectBasic
-import HJS.Interpreter.Object
-import HJS.Interpreter.Array
-import HJS.Interpreter.Function
-import HJS.Interpreter.Error
-import HJS.Interpreter.String
-import HJS.Interpreter.Regex
-
-import Control.Monad.State 
-
-globalObj = ObjId 1
-objPrototype = ObjId 2
-
-
-print' :: InterpM Value
-print' = do
-             args' <- getArgs
-             op <- getProperty globalObj "_output"
-             args <- mapM toRealString args'
-             op' <- toRealString op
-             let 
-                 prefix = if isUndefined op then "" else (op' ++ "\n")
-                 s = concat (prefix:args)
-             putProperty globalObj "_output" (inj s)
-             return (inj Undefined)
-
-
-putBuiltIn :: ObjId -> String -> [String] -> InterpM Value -> InterpM ()
-putBuiltIn obj name args f = do
-                                fo <- newBuiltInFunction args f
-				putProperty obj name (inj fo)
-
-objectConstructor :: InterpM Value
-objectConstructor = do 
-                          o <- newObject "Object"
-                          return $ inj o
-
-
-
-newClassObject name = do
-		 obj <- newObject "Object"
-                 putProperty globalObj name (inj obj)
-                 fo <- newBuiltInFunction [] objectConstructor
-                 o <- newObject "Object"
-                 putProperty obj "prototype" (inj o)
-                 putProperty obj "Construct" (inj fo)
-
-constructorConstructor :: InterpM Value
-constructorConstructor = defaultConstructor  "Object"
-
---objectWithClassConstructor klass = do 
---                        o <- newObject klass
---			(((_,_,t):_), _) <- get
---                        args <- getArgs
---		        p <- getProperty t "prototype"
---                        putObjectProperty o "__proto__" p 
---                        return $ inj o
-
-
--- Creates a new constructor with supplied constructor
-newConstructorWith :: String -> InterpM Value -> InterpM ObjId
-newConstructorWith name c = do 
-                            fo <- newFuncObject [] [] c
-                            putObjectProperty fo "name" (inj name)
-                            putObjectProperty globalObj name (inj fo)
-			    return fo
-
--- Creates a new constructor
-newConstructor name = do 
-                            fo <- newFuncObject [] [] (defaultConstructor name)
-                            putObjectProperty fo "name" (inj name)
-                            putObjectProperty globalObj name (inj fo)
-			    return fo
-
-addBuiltIn :: InterpM ()
-addBuiltIn = do
-                 fo <- newBuiltInFunction ["arg1"]  print'
-                 putProperty globalObj "print" (inj fo)
-                 addObjectBuiltIn newConstructor putBuiltIn
-                 addFunctionBuiltIn newConstructor putBuiltIn callFunction
-                 addErrorBuiltIn newConstructorWith  putBuiltIn
-		 addArrayBuiltIn newConstructorWith putBuiltIn 
-	         addStringBuiltIn newConstructorWith
-	         addRegexBuiltIn newConstructorWith putBuiltIn
-                 return ()
-
-initEnvironment = do
-                      go <- newObjectRaw "global"
-                      op <- newObjectRaw "Object"
-                      putPropertyInternal go "__proto__" (inj op)
-                      putPropertyInternal op "__parent__" (inj go)
-                      pushContext ([go],go,go, ObjIdNull)
-                      addBuiltIn
− src/HJS/Interpreter/Interp.hs~
@@ -1,561 +0,0 @@-{-# OPTIONS -fglasgow-exts #-}
-{-# OPTIONS -fallow-overlapping-instances  #-}
-{-# OPTIONS -fallow-incoherent-instances #-}
-module HJS.Interpreter.Interp where
-
-import Control.Monad.Identity
-import Control.Monad.Error
-import Control.Monad.State
-
-
-import HJS.Parser.JavaScript
-import HJS.Interpreter.InterpMDecl
-import HJS.Interpreter.InterpM
-
-import HJS.Interpreter.ObjectBasic
-import HJS.Interpreter.Object
-import HJS.Interpreter.Array
-import HJS.Interpreter.Regex
-import HJS.Interpreter.Debugger
-
-import Data.Map (Map,fromList,lookup,empty,insert)
-
-
-data MyError = NoMsg | Msg String deriving Show
-
-instance Error MyError where
-	 noMsg = NoMsg
-	 strMsg = Msg 		 
-    
-
-
-class InterpC t where
-    interp  :: t -> InterpM Value
-
-
-instance InterpC Null where
-   interp Null = return $ inj Null   
-
-instance InterpC a => InterpC (Maybe a) where
-   interp (Just x) = interp x
-   interp _ = return $ inj Null
-
-instance InterpC a => InterpC [a] where
-   interp [] = return $ undefinedValue
-   interp (x:[]) = interp x
-   interp (x:xs) = do 
-		       interp x
-                       interp xs
-
-instance (InterpC t1, InterpC t2) => InterpC (Either t1 t2) where
-   interp (Left x) = interp x
-   interp (Right x) = interp x
-
-instance InterpC Literal where
-   interp (LitInt i) = unitInj i
-   interp (LitString s) = return $ inj s
-   interp (LitBool b) = return $ inj b
-   interp (LitNull) = return nullValue
-
-
-instance InterpC PrimExpr where
-   interp (Literal l) = interp l
-   interp (Ident s)   = return $ inj (Ref s)
-   interp (Brack e) = interp e
-   interp (PEFuncDecl f) = interp f
-   interp This = getThis
-   interp (Array (ArrSimple a)) = do
-                            vs <- mapM interp a
-                            o <- newArrayObject vs
-                            return $ inj o
-   interp (Regex (p,f)) = do
-		        newRegex (inj p) (inj f)
-
-
-
-   interp x = throwInternalError $ "Cannot interp PrimExpr " ++ (show x)
-
-
-
-instance InterpC MemberExpr where
-   interp (MemPrimExpr p) = interp p
-   interp (ArrayExpr me e) = do
-			        o <- interp me >>= getValue
-                                e' <- interp e
-                                x <- toRealString e'
-                                case (prj o) of 
-                                    (Just (o::ObjId)) -> return (inj $ RefObj o x)
-				    _ -> throwInternalError $ "Invalid array access: " ++ (show o)
-
-
---                                o <- interp me >>= getValue
---                                e' <- interp e
---                                case (prj o) of 
---                                    (Just (o::ObjId)) -> getProperty o pname(toRealString e')
---				    _ -> throwInternalError $ "Invalid array access" ++ (show o)
-
-   interp (MemberNew me args) =  do
-                                oref <- interp me >>= getValue
-                                args' <- mapM interp args
-                                newCall oref args'
-
---                                case (prj o) of 
---                                    (Just (o::ObjId)) -> do 
---							  args' <- mapM interp args
---                                                          fo <- getProperty o "Construct"
---                                                          callFunction fo args' o
---                                    _ -> throwInternalError $ "Type Error: Not an Object" ++ (show o)
-
-   interp (MemberCall me s) = do
-                                  ro <- getRefObj me s
-                                  return $ inj ro
-
-
-getRefObj me s = do 
-                    o <- interp me >>= getValue
-                    case (prj o) of 
-                         (Just (o::ObjId)) -> return (RefObj o s)
-                         _ -> throwInternalError $ "Not an object" ++ (show o)
-
-
-
-instance InterpC NewExpr  where
-   interp (MemberExpr  p) = interp p
-
-
--- LeftExpr will return a reference
-instance InterpC LeftExpr where
-   interp (NewExpr n) = interp n
-   interp (CallExpr c) = interp c
-
-instance InterpC CallExpr where
-   interp (CallDot e s) = do
-                              obj <- interp e
-                              case (prj obj) of 
-                                  (Just (i::ObjId)) -> return (inj $ RefObj i s)
-                                  _ -> throwInternalError "Attempt to access property on a non-object"
-
---   interp (CallMember (MemberCall me s) args) = do
---                                  r@(RefObj o _) <- getRefObj me s
---                                  f <- getValue (inj r)
---                                  callFunction f args o
-
-   interp (CallMember m args) = do
-                                  r <- interp m
-                                  args' <- mapM interp args
-                                  case prj r of 
-                                          Just (ref ::Ref) -> do 
-							         f <- getValue r
-                                                                 case ref of 
-                                                                    RefObj t _ -> callFunction f args' t
-                                                                    Ref t  -> callFunction f args' ObjIdNull
-                                          _ -> throwInternalError "CallMember requires function reference"
-
-   interp (CallPrim p) = interp p
-   interp (CallCall m args) = do
-                                  f <- interp m
-                                  args' <- mapM interp args
-                                  callFunction f args' ObjIdNull
-
-   interp p = throwInternalError $ "Cannot interp " ++ (show p)
-
--- Call the function object with supplied arguments
-callFunction :: Value -> [Value] -> ObjId -> InterpM Value
-callFunction f args' this = do
-                                  case (prj f) of 
-                                        (Just (i::ObjId)) -> do
-                                                         callFunction' i args' this
-					_        -> throwInternalError $ "Internal Error: Invalid function object" ++ (show f)
-
--- Not used.
-getCaller = do
-               cargs <- getValue (inj $ Ref "arguments")
-	       case cargs == undefinedValue of 
-		  True -> return nullValue
-                  False ->  getProperty (toObjId cargs) "callee" 
-
-callFunction' i args' this = do 
-                                                         c <- getCallee
-                                                         putProperty i "caller" c
-							 argo <- newObject "arguments"
-						         act <- newObject "activation"
-                                                         putProperty argo "callee" (inj i)
-						         putProperty act "arguments" (inj argo)
-                                                         sc' <- getProperty i "Scope"
-                                                         let (Just (sc::[ObjId])) = (prj sc')
-                                                         pushContext (act:sc,act,this,i)
-                                                         putValue (inj $ Ref "arguments") (inj argo)
-                                                         fargs' <- getProperty i "Args"
-                                                         let (Just (fargs::[String])) = (prj fargs')
-                                                         zipWithM (\x y -> putProperty argo (show x) y) [0..] args'
-                                                         zipWithM (\x y -> putProperty act x y) fargs args'
-                                                         putProperty argo "length" (inj (length args'))
-                                                         se <- getProperty i "Call"
-                                                         res <- (runFunc se) `catchError` handleReturn
-
-                                                         popContext
-                                                         return res
-                                        
-
-
-
-runFunc se = do
-                 case (prj se) of
-                               (Just (CallJS se)) ->  foldM (\v x -> interp x) (Left 0) se
-                               (Just (CallBuiltIn f)) -> f
-                               _ -> throwInternalError "Internal Error: Invalid function call block"
-
-
--- PostFix returns a real value, so this is where references get dereferenced
-instance InterpC PostFix where
-   interp (LeftExpr l) = do 
-			    r <- interp l
-                            getValue r
-
-   interp (PostInc l) = do 
-			    r <- interp l
-                            v <- getValue r -- TODO fixme.
-                            v' <- getValue r `bindPrj` \ i -> 
-                                   unitInj (i+ 1)
-                            putValue r v'
-                            return v
-
-
-instance InterpC UExpr where
-   interp (PostFix p) = interp p
-   interp (Not u ) = do u' <- interp u
-                        b <- toRealBool u'
-                        case b  of
-                            True -> return $ inj False
-                            _ -> return $ inj True
-   interp (TypeOf p) = interp p >>= typeOfString
-   interp (UnaryMinus p) = do x <- interp p
-                              return $ inj $ ((-1) * (toRealInt x))
-   interp x = throwInternalError $ "Internal Error: Cannot handle " ++ (show x)
-                            
-{-
-instance InterpC AddExpr where
-   interp (MultExpr x) = interp x
-   interp (Plus x y) = liftIt (+) x y
-   interp (Minus x y) = liftIt (-) x y
-
-instance InterpC ShiftE where
-   interp (AddExpr p) = interp p
-
-instance InterpC RelE where
-   interp (ShiftE p) = interp p
-   interp (LessThan x y) = liftRel (<) x y
-   interp (GreaterThan x y) = liftRel (>) x y 
-   interp (LessEqual x y) = liftRel (<=) x y
-   interp (GreaterEqual x y)  = liftRel (>=) x y
-
-
-instance InterpC EqualE where
-   interp (RelE p) = interp p
-   interp (Equal x y) = liftRel (==) x y
-
-instance InterpC BitAnd where
-   interp (EqualE p) = interp p
-
-instance InterpC BitXOR where
-   interp (BitAnd p) = interp p
-
-instance InterpC BitOR where
-   interp (BitXOR p) = interp p
-
-instance InterpC LogAnd where
-   interp (BitOR p) = interp p
-   interp (LALogAnd x y) =  liftBool (&&) x y
-
-
-
-instance InterpC LogOr where
-   interp (LogAnd p) = interp p
-   interp (LOLogOr x y) =  liftBool (||) x y
---}
-
-instance InterpC AExpr where
-   interp (AEUExpr e) = interp e
-   interp (AOp "-" x y) = liftIt (-) x y
-   interp (AOp "+" x y) = liftIt22 (+) x y
-   interp (AOp "*" x y) = liftIt (*) x y
-   interp (AOp "&&" x y) = liftBool (&&) x y
-   interp (AOp "==" x y) = do x' <- interp x; y' <- interp y; return $ inj $ abstractEquality x' y'
-   interp (AOp "!=" x y) = do x' <- interp x; y' <- interp y; return $ inj $ not $ abstractEquality x' y'
-   interp (AOp "===" x y) = do x' <- interp x; y' <- interp y; return $ inj $ strictEquality x' y'
-   interp (AOp "<" x y) = liftRel (<) x y
-   interp (AOp ">" x y) = liftRel (>) x y
-   interp (AOp "<=" x y) = liftRel (<=) x y
-   interp (AOp ">=" x y) = liftRel (>=) x y
-
-   interp (AOp op x y) = throwInternalError $ "Operator not implemented: " ++ (show op)
-
-liftIt22 :: (InterpC x, InterpC y) => (Int -> Int -> Int) -> x -> y -> InterpM Value
-liftIt22 f x y = do
-                    x' <- interp x >>= toPrimitive HNone
-                    y' <- interp y >>= toPrimitive HNone
-                    case typeOf x' == typeOf nullStringValue || typeOf y' == typeOf nullStringValue of
-                           True -> do
-                                      x'' <- toRealString x' 
-                                      y'' <- toRealString x'
-                                      return $ inj (x''  ++ y'')
-                           False -> return $ inj $ f (toRealInt x') (toRealInt y')
-                    
-
-strictEquality x y = if typeOf x /= typeOf y then False
-                     else if ( x == nullValue || y == undefinedValue) then True
-                     else ((==) x y)
-
-abstractEquality x y = if typeOf x == typeOf y then ((==) x y)
-                       else ( x == nullValue && y == undefinedValue) || ( y == nullValue && x == undefinedValue)
-
---if  typeOf x == (typeOf nullValue) || typeOf x == (typeOf undefinedValue) then True else False
-
-liftBool f x y = do
-		    x' <- interp x >>= toRealBool
-                    y' <- interp y >>= toRealBool
-                    return $ inj $ (f x' y')
-
-liftRel f x y =  do 
-                    x' <- interp x 
-                    y' <- interp y
-                    return $ inj $ (f x' y')
-
-
-instance InterpC CondE where
-   interp (AExpr p) = interp p
-
-instance InterpC AssignE where
-    interp (CondE p) = interp p
-    interp (Assign left AssignNormal right) = do 
-		                                  v <- interp right
-                                                  r <- interp left
-                                                  putValue r v
-                                                  return v
-    interp (Assign left op right ) = do
-                                            v <- interp right
-                                            r <- interp left
-                                            rval <- getValue r 
-                                            v' <- case op of 
-                                                        AssignOpPlus -> liftIt3 (+) rval v
-                                            putValue r v'
-                                            return v'
-    interp (AEFuncDecl fd) = interp fd
-
-instance InterpC FuncDecl where
-    interp (FuncDecl (Just s) args ses) = do
-                                            fo <- newFuncObject args ses (defaultConstructor "Object")
-                                            putProperty fo "name" (inj s)
-                                            putValue (inj (Ref s)) (inj fo)
-                                            return (inj fo)
-                   
-  
-instance InterpC Expr where
-    interp (AssignE p) = interp p
-
-instance InterpC VarDecl where
-    interp (VarDecl s (Just e)) = do v <- interp e; putValue (inj (Ref s)) v; return v
-    interp (VarDecl s Nothing) = do putValue (inj (Ref s)) (inj Undefined); return (inj Undefined)
-
-instance InterpC IfStmt where
-    interp (IfElse e s1 s2) = do
-                                 b <- interp e >>= toRealBool
-                                 case b of
-                                       True  -> interp s1
-                                       _ -> interp s2
-    interp (IfOnly e s) = do 
-                                 b <- interp e >>= toRealBool
-                                 case b of
-                                       True  -> interp s
-				       _ -> return (inj Undefined)
-
-
--- handleBreakContinue 
-handleBreakContinue (ThrowBreak s) = return (inj Break)
-handleBreakContinue (ThrowContinue s) = return (inj (0::Int))
-handleBreakContinue e = throwError e
-                              
-                          
-
--- TODO Need to syntacticall check break/continue are within It statement
---      Handle values of the ItStmt
---      Push a context so that vars local to this are lost when leaving.
-instance InterpC ItStmt where
-    interp (DoWhile s e ) = do
-                            vv <- (interp s) `catchError` handleBreakContinue 
-                            case (prj vv) of
-                                  (Just Break)  -> return (inj (0::Int))
-                                  _   -> do 
-                                            b <- interp e >>= toRealBool
-                                            case b of
-                                                  False -> return vv
-                                                  _ -> interp (DoWhile s e )
-    interp (While e s) = do
-                            b <- interp e >>= toRealBool
-			    case b of
-                                 False -> return (inj Undefined) -- FIXME 
-                                 _ -> do
-                                         vv <- (interp s) `catchError` handleBreakContinue
-                                         case (prj vv) of
-                                                (Just Break)  -> return (inj (0::Int))
-                                                _   -> interp (While e s)
-    interp (For e1 e2 e3 s) = interpFor e1 e2 e3 s
-    interp (ForVar e1 e2 e3 s) = interpFor e1 e2 e3 s 
-    interp (ForIn e1 e2 s ) = interpForIn e1 e2  s 
-
--- Note that e2 is not evaluated each time around the loop. TODO - check this.
-interpForIn e1 e2 s = do
-                          v <- interp e1
-                          e <- interp e2
-			  ps <- getPropertyNames (toObjId e)
-                          mapM (\p -> do putValue v (inj p); interp s) ps
-			  return (undefinedValue)
-                          
-
-
-interpFor e1 e2 e3 s = do
-                          interp e1
-                          b <- interp e2 >>= toRealBool
-                          case b of 
-					False -> return (inj Null)
-                                        _ -> do
-                                                vv <- interp s `catchError` handleBreakContinue
-						case (prj vv) of
-                                                    (Just Break) -> return (inj (0::Int))
-                                                    _ -> do  interp e3; interp (For Nothing e2 e3 s)
-                                
-                                
-
-
-interpList :: InterpC a => [a] -> InterpM Value
-interpList (x:[]) = interp x
-
-                     
-interpList (x:xs) = do
-                       interp Null
-                       interp x
-                       interpList xs
---
---interpList (x:[]) = do
---                        interp x
-
-instance InterpC Stmt where
-    interp (StmtPos p s) = do 
-  		              putPosition p
-                              debugPoint p
- 		              interp s
-
-instance InterpC Stmt' where
-    interp (ExprStmt p) = interp p
-    interp (IfStmt p) = interp p
-    interp (Block xs) = interp xs 
-    interp (ItStmt p) = interp p
-    interp (ReturnStmt (Just p)) = interp p >>= throwReturn
-    interp (ReturnStmt Nothing) = throwReturn (inj Undefined)
-    interp (BreakStmt s) = throwBreak s
-    interp (ContStmt s) = throwContinue s
-    interp (EmptyStmt) = return $ inj Undefined
-    interp (VarStmt v) = do vs <- mapM interp v; return $ head vs
-    interp (ThrowExpr e) = interp e >>= throwException
-    interp (TryStmt e) = interp e
-    interp (Switch e s) = do
-                             x <- interp e
-                             handleSwitch s x `catchError` handleBreakContinue
-
-    interp s = error $ "Missing Stmt handling" ++ (show s)
-
-handleSwitch ((CaseClause e s):cs) x = do 
-				            y <- interp e
-                                            case abstractEquality x y of 
-                                                 True -> do interp s; fallThruSwitch  cs
-                                                 False -> handleSwitch cs x
-
-handleSwitch ((DefaultClause s):cs) x = do interp s; fallThruSwitch cs
-
-handleSwitch [] x = return $ undefinedValue -- FIXME Wrong if we want to handle values of stmts correctly
-
-fallThruSwitch ((CaseClause e s):cs) = do interp s; fallThruSwitch cs
-fallThruSwitch ((DefaultClause s):cs) = do interp s; fallThruSwitch cs
-fallThruSwitch [] = return $ undefinedValue
-
-instance InterpC TryStmt where
-    interp (TryTry s1 c s2) = interp s1 `catchError` (handleException c)
-
-instance InterpC Catch where
-    interp (Catch _ s) = interp s
-    interp (CatchIf _ s e) = interp s 
-    interp (CatchCatch i _ s) = interp s
-
--- TODO - remove the putValue i
-handleException ((CatchCatch i _ s):_) (ThrowException v) = do
-                                                            putValue (inj $ Ref i) v
-                                                            interp s
-handleException _ e = throwError e
-
-instance InterpC SourceElement where
-    interp (Stmt s) = interp s
-    interp (SEFuncDecl fd) = interp fd
-
-instance InterpC JSProgram where
-    interp (JSProgram xs) = interp xs
-
-
--- This needs to have sub -> sub1 -> Int otherwise get problem with bindPrj.
-liftIt ::(SubType sub Value, SubType sub1 Value, InterpC t1, InterpC t) => (sub -> sub1 -> Int ) -> t -> t1 -> InterpM Value
-liftIt f x y = interp x `bindPrj`\i -> 
-               interp y `bindPrj` \j -> 
-                   (return . inj) ((f i j))
-
-liftIt3 ::(SubType sub Value, SubType sub1 Value) => (sub -> sub1 -> Int ) -> Value -> Value-> InterpM Value
-liftIt3 f x y = case (prj x) of 
-                    (Just x') -> case (prj y) of 
-                                     (Just y') -> return $ inj $ f x' y'
-                                     _ -> throwInternalError "Cannot prj"
-                    _ -> throwInternalError "Cannot prj"
-
-liftIt2 g x y = interp x `bindPrj`\i -> 
-               interp y `bindPrj` \j -> g i j 
-
-
-
-{--
-instance InterpC MultExpr where
-   interp (UExpr x) = interp x
-   interp (Times x y) = liftIt (*) x y
-   interp (Div x y) =  liftIt2 (\i j -> 
-			   if j == 0 then 
-                                 throwInternalError "Run Time Error: Divide by Zero"
-                           else 
-                                 unitInj ((i `div` j )::Int)) x y
-
-   interp (Mod x y) =  liftIt2 (\i j -> 
-			   if j == 0 then 
-                                 throwInternalError "Run Time Error: Divide by Zero"
-                           else 
-                                 unitInj ((i `mod` j )::Int)) x y
---}
-unitInj = return . inj
-
-m `bindPrj` k = 
-    m >>= \a -> 
-	case (prj a) of
-		     Just x -> k x
-		     Nothing -> (throwInternalError $ "Internal Error: Cannot prj Value" ++ (show a))
-
-
-defaultConstructor :: String -> InterpM Value
-defaultConstructor name = do 
-                        o <- newObject name
-			t <- getThis
-                        args <- getArgs
-		        p <- getProperty (toObjId t) "prototype"
-                        putProperty o "__proto__" p 
-                        callFunction' (toObjId t) args o
-                        return $ inj o
-
-
-x :: Value
-x = inj (ObjId 1)
-
-callIt :: Int -> Int
-callIt _ = 99
src/HJS/Interpreter/InterpM.hs view
@@ -1,17 +1,10 @@-{-
-   Note: Do not add 
-          {-# OPTIONS -fglasgow-exts #-}
-	  {-# OPTIONS -fallow-overlapping-instances  #-}
-	  {-# OPTIONS -fallow-incoherent-instances #-}
-   as this causes problems
-
---}
-{-# OPTIONS -fglasgow-exts #-}
+{-# LANGUAGE OverlappingInstances, IncoherentInstances, FlexibleInstances,
+  MultiParamTypeClasses, PatternSignatures, TypeSynonymInstances #-}
 module HJS.Interpreter.InterpM where
 
 import Control.Monad.Identity
 import Control.Monad.Error
-import Control.Monad.State 
+import Control.Monad.State
 import System.IO.Unsafe
 import Debug.Trace
 import HJS.Interpreter.Printf
@@ -60,8 +53,8 @@    toPrimitive h (Left x) = toPrimitive h x
    toPrimitive h (Right x) = toPrimitive h x
 
-   
 
+
 instance Convert Int where
    toBoolean 0 = return $ inj False
    toBoolean _ = return $ inj True
@@ -114,10 +107,10 @@ instance Convert ObjId where
    toString o = do
                     v <- getProperty o "toString"
-		    case v == undefinedValue of
+                    case v == undefinedValue of
                                 False -> callFunction v [] o
                                 True -> return $ inj "[object]"
-                    
+
    toPrimitive h o   = do
                           m <- getProperty o "toString"
                           case m == undefinedValue of
@@ -156,47 +149,47 @@ toObjId = prjObjId
 
 prjObjId :: Value -> ObjId
-prjObjId v = case prj v of 
+prjObjId v = case prj v of
                       (Just s) -> s
                       _        -> error $ "Impossible Error converting to ObjId" ++ (show v)
 
 prjInt :: Value -> Int
-prjInt v= case prj v of 
+prjInt v= case prj v of
                       (Just s) -> s
                       _        -> error "Impossible Error"
 
 prjBool :: Value -> Bool
-prjBool v= case prj v of 
+prjBool v= case prj v of
                       (Just s) -> s
                       _        -> error "Impossible Error"
 
 prjString :: Value -> String
-prjString v = case prj v of 
+prjString v = case prj v of
                       (Just s) -> s
                       _        -> error "Impossible Error"
 
 toValueList :: Value -> [Value]
-toValueList v = case prj v of 
+toValueList v = case prj v of
                       (Just (s::[Value])) -> s
                       _        -> error "Impossible Error"
 
 toRealInt :: Convert a => a -> Int
-toRealInt v = case prj (toNumber v) of 
+toRealInt v = case prj (toNumber v) of
                       (Just s) -> s
                       _        -> error "Impossible Error"
 
 
 toRealString :: Convert a => a -> InterpM String
-toRealString v = do 
-		    s <- toString v
+toRealString v = do
+                    s <- toString v
                     return $ prjString s
 
 toRealBool :: Convert a => a -> InterpM Bool
 toRealBool v = do
                   b <- toBoolean v
-                  return $ prjBool b 
-  
+                  return $ prjBool b
 
+
 typeOfString :: Value -> InterpM Value
 typeOfString v | typeOf v == typeOf undefinedValue = return $ inj "undefined"
 typeOfString v | typeOf v == typeOf nullValue = return $ inj "object"
@@ -242,41 +235,41 @@ getObject :: ObjId -> InterpM Object
 getObject i = do
                    s  <- get
-                   case M.lookup i (oheap s) of 
+                   case M.lookup i (oheap s) of
                       Just o -> return o
                       Nothing -> throwInternalError "Object not found"
-               
+
 putObject :: Object -> InterpM ()
 putObject o = do
                    s <- get
                    put s { oheap = M.insert (idd o) o (oheap s) }
-              
-             
+
+
 getObjectProperty' :: Object -> String -> InterpM (Maybe ObjId)
 getObjectProperty' o k = do
-                            v <- getProperty' o k 
-                            case (prj v) of 
+                            v <- getProperty' o k
+                            case (prj v) of
                                   Just (id::ObjId) -> return $ Just id
                                   Nothing -> return Nothing
-                         
+
 getPrototypeObject' o = do
-		            case M.lookup "__proto__" (properties o) of
-                 		    Just (v,_) -> do 
-                                                      case prj v of 
+                            case M.lookup "__proto__" (properties o) of
+                                    Just (v,_) -> do
+                                                      case prj v of
                                                           Just (id::ObjId) -> return $ Just id
                                                           Nothing -> return Nothing
                                     Nothing -> return Nothing
-         
 
+
 getProperty' :: Object -> String -> InterpM Value
-getProperty' o k = do 
+getProperty' o k = do
                        case M.lookup k (properties o) of
-            		Just (v,_) -> return v
-                        Nothing -> do 
-                                     proto <- getPrototypeObject' o 
-                                     case proto  of 
-						  Nothing -> return $ inj Undefined
-					          Just p -> getProperty p k
+                        Just (v,_) -> return v
+                        Nothing -> do
+                                     proto <- getPrototypeObject' o
+                                     case proto  of
+                                                  Nothing -> return $ inj Undefined
+                                                  Just p -> getProperty p k
 
 getProperty :: ObjId -> String -> InterpM Value
 getProperty id k = do
@@ -285,70 +278,70 @@                      getProperty' o k
 
 
-putPropertyInternal id k v = do 
-			     o <- getObject id 
-		             cp <- canPut o k
-		             case cp of 
-				       True ->  do
-				   	     let o' = o { properties = M.insert k (v,[DontEnum]) (properties o)}
-			       	             putObject o'
-				       False -> return ()
+putPropertyInternal id k v = do
+                             o <- getObject id
+                             cp <- canPut o k
+                             case cp of
+                                       True ->  do
+                                             let o' = o { properties = M.insert k (v,[DontEnum]) (properties o)}
+                                             putObject o'
+                                       False -> return ()
 
 putProperty :: ObjId -> String -> Value -> InterpM ()
-putProperty id k v = do 
+putProperty id k v = do
                          traceM $ printf "putProperty %s %s" id k
                          o <- getObject id
-                         case klass o of 
+                         case klass o of
                                 "Array" -> putArrayProperty id k v
                                 _ -> putObjectProperty id k v
 
-putObjectProperty id k v = do 
- 			               o <- getObject id 
-				       cp <- canPut o k
-				       case cp of 
-					       True ->  do
-						   	     let o' = o { properties = M.insert k (v,[]) (properties o)}
-							     putObject o'
-					       False -> return ()
-                  
-toUInt32 :: String -> Int       
+putObjectProperty id k v = do
+                                       o <- getObject id
+                                       cp <- canPut o k
+                                       case cp of
+                                               True ->  do
+                                                             let o' = o { properties = M.insert k (v,[]) (properties o)}
+                                                             putObject o'
+                                               False -> return ()
+
+toUInt32 :: String -> Int
 toUInt32 s = read s
 
-putArrayProperty id k v = do 
+putArrayProperty id k v = do
                                  o <- getObject id
                                  cp <- canPut o k
-                                 case cp of 
+                                 case cp of
                                      True ->  do
                                                  len <- getProperty id "length"
-                                                 case prj len of  
-                                                      (Just (l::Int)) -> do 
-									     let idx = toUInt32 k
+                                                 case prj len of
+                                                      (Just (l::Int)) -> do
+                                                                             let idx = toUInt32 k
                                                                                  newlen = if idx < l then l else idx + 1
                                                                              putObjectProperty id k v
                                                                              putObjectProperty id "length" (inj newlen)
                                                       _ -> throwInternalError $ "Invalid value for array length: " ++ (show len)
-                                     False -> return () 
-                                                 
+                                     False -> return ()
 
+
 checkAttr :: Object -> String -> Attribute -> InterpM Bool
 checkAttr o k attr = do attrs <- getAttr o k; return (elem attr attrs)
 
 getAttr :: Object -> String -> InterpM [Attribute]
-getAttr o k = case M.lookup k (properties o) of 
+getAttr o k = case M.lookup k (properties o) of
                  Just (_,a) -> return a
-                 Nothing -> case prototype o of 
+                 Nothing -> case prototype o of
                               Nothing -> return []
-                              Just p -> do 
+                              Just p -> do
                                            p' <- getObject p
                                            getAttr p' k
 
-putAttr o k attr = case M.lookup k (properties o) of 
-                 Just (v,attrs) -> do 
-			              let o' = o { properties = M.insert k (v,attr:attrs) (properties o)}
-  				      putObject o'
-                 Nothing -> case prototype o of 
+putAttr o k attr = case M.lookup k (properties o) of
+                 Just (v,attrs) -> do
+                                      let o' = o { properties = M.insert k (v,attr:attrs) (properties o)}
+                                      putObject o'
+                 Nothing -> case prototype o of
                               Nothing -> return ()
-                              Just p -> do 
+                              Just p -> do
                                            p' <- getObject p
                                            putAttr p' k attr
 
@@ -386,18 +379,18 @@ 
 -- Get the get function being called
 getCallee:: InterpM Value
-getCallee = do 
-	            s <- get -- (((_,_,_,c):_), _,_) <- get
+getCallee = do
+                    s <- get -- (((_,_,_,c):_), _,_) <- get
                     let ((_,_,_,c):_) = ctx s
-                    case c of 
-                        ObjIdNull -> return nullValue 
+                    case c of
+                        ObjIdNull -> return nullValue
                         _ -> return $ inj c
 
 getStmtLine :: InterpM Int
 getStmtLine = do
                 s <- get
-                let (l,c) = pos s 
-	        return l
+                let (l,c) = pos s
+                return l
 
 putDebugFlags :: [DebugAction] -> InterpM ()
 putDebugFlags d = do
@@ -415,30 +408,30 @@                 return $ flags s
 
 getThis :: InterpM Value
-getThis = do 
+getThis = do
           s <- get
-	  let (_,_,t,_):_ = ctx s
+          let (_,_,t,_):_ = ctx s
           return $ inj t
 
 getValue :: Value -> InterpM Value
-getValue v = do 
+getValue v = do
                  sc <- getScopeChain
-                 case prj v of 
-                     ((Just (Ref s))::Maybe Ref) -> getValue' sc s 
+                 case prj v of
+                     ((Just (Ref s))::Maybe Ref) -> getValue' sc s
                      ((Just (RefObj o s))::Maybe Ref) -> getProperty o s
                      _ -> return v
 
 getObjectValue :: Value -> InterpM ObjId
 getObjectValue v = do
                        ov <- getValue v
-                       case prj ov of 
+                       case prj ov of
                              (Just (o::ObjId)) -> return o
                              _ -> throwInternalError "Expecting to get an object value"
 
 getValue' :: [ObjId] -> String -> InterpM Value
 getValue' (c:cs) s = do
                         p <- getProperty c s
-                        case prj p of 
+                        case prj p of
                             ((Just Undefined)::Maybe Undefined) -> getValue' cs s
                             _ -> return p
 
@@ -447,58 +440,58 @@ 
 -- Put value into environment if Value is a reference, throw error if it isn't
 putValue :: Value -> Value -> InterpM ()
-putValue r v = do 
-	          s <- get
-                  let (_,vo,_,_):_ = ctx s 
-                  case prj r of 
-			((Just (Ref s))::Maybe Ref) -> putProperty vo s v
+putValue r v = do
+                  s <- get
+                  let (_,vo,_,_):_ = ctx s
+                  case prj r of
+                        ((Just (Ref s))::Maybe Ref) -> putProperty vo s v
                         ((Just (RefObj o s))::Maybe Ref) -> putProperty o s v
                         _ -> throwInternalError "Internal Error: Invalid Reference"
 
 setPrototype o = do
                     c <- getThis
                     p <- getProperty (toObjId c) "prototype"
-                    putPropertyInternal o "__proto__" p 
+                    putPropertyInternal o "__proto__" p
 
-setFuncProto fo  = do 
+setFuncProto fo  = do
                         v <- getValue  (inj $ Ref "Function")
-                        case prj v of 
+                        case prj v of
                              (Just (o::ObjId)) -> do getProperty o "prototype" >>= putProperty fo "__proto__"; return ()
                              Nothing -> return $ inj (ObjId 2)
 
 getScopeChain = do
-		   s <- get 
+                   s <- get
                    let (sc,_,_,_):_ = ctx s
                    return sc
 
 newFuncObject :: [String] -> [SourceElement] -> InterpM Value -> InterpM ObjId
 newFuncObject args ses fc = do
                              sc <- getScopeChain
-			     fo <- newObjectRaw "Function"
-		             setFuncProto fo
+                             fo <- newObjectRaw "Function"
+                             setFuncProto fo
                              p <- newObjectRaw "Object"
                              putPropertyInternal p "__proto__" (inj $ ObjId 2)
                              putProperty fo "prototype" (inj p)
                              putProperty fo "Scope" (inj sc)
                              putProperty fo "Call" (inj (CallJS ses))
                              putProperty fo "Args" (inj args)
-                             cf <- newBuiltInFunction [] fc 
-			     putProperty fo "Construct" (inj cf)
+                             cf <- newBuiltInFunction [] fc
+                             putProperty fo "Construct" (inj cf)
                              return fo
-     
-newBuiltInFunction :: [String] -> InterpM Value -> InterpM ObjId           
-newBuiltInFunction args f = do                                        
-  	             	     sc <- getScopeChain
-			     fo   <- newObjectRaw "Function"
+
+newBuiltInFunction :: [String] -> InterpM Value -> InterpM ObjId
+newBuiltInFunction args f = do
+                             sc <- getScopeChain
+                             fo   <- newObjectRaw "Function"
                              p <- newObjectRaw "Object"
                              putProperty fo "prototype" (inj p)
                              putProperty fo "Scope" (inj sc)
                              putProperty fo "Call" (inj (CallBuiltIn f))
                              putProperty fo "Args" (inj args)
-                             return fo	    
-                                                  
+                             return fo
 
-{-		      
+
+{-
 -- Some test objects
 
 newObject = Object { prototype = Nothing, klass="Object", value=Nothing, properties = M.empty }
@@ -532,7 +525,7 @@ 
 
 
--- The order of Monad composition is important. If you don't then when 
+-- The order of Monad composition is important. If you don't then when
 -- throwing you lose state
 -- type InterpM  = ErrorT Throwable (StateT JSState Identity)
 --type InterpM  = StateT JSState (ErrorT Throwable Identity)
@@ -547,12 +540,12 @@ --putGlobalContext = do
 --                     put globalContext
 
-putPosition p = do 
+putPosition p = do
                     s <- get
                     put s { pos = p }
 
 pushContext :: Ctx -> InterpM ()
-pushContext c = do 
+pushContext c = do
                   s <- get
                   let cs = ctx s
                   put s { ctx = c:cs }
@@ -584,39 +577,39 @@                              getPropertyNames' o
 
 getPropertyNames' :: Object -> InterpM [String]
-getPropertyNames' o  = do 
-                               let ks = keys $ properties o 
+getPropertyNames' o  = do
+                               let ks = keys $ properties o
                                ks <- filterM (canEnum o) ks
                                p <- getProperty' o "__proto__"
-                               case prj p of 
+                               case prj p of
                                     (Just (i::ObjId)) -> do
                                                              ks' <- getPropertyNames i
-							     return $ Data.List.union ks ks'
+                                                             return $ Data.List.union ks ks'
                                     _ -> return ks
 
 
-                                  
-                                
-                                
--- All internal new object calls actions must go through this.                                
-newCall name args = do 
-                        o <- getValue name 
-                        case (prj o) of 
-                                    (Just (o::ObjId)) -> do 
+
+
+
+-- All internal new object calls actions must go through this.
+newCall name args = do
+                        o <- getValue name
+                        case (prj o) of
+                                    (Just (o::ObjId)) -> do
                                                           fo <- getProperty o "Construct"
                                                           callFunction fo args o
                                     _ -> throwInternalError $ "Type Error: Not an Object" ++ (show o)
-                       
-                        
+
+
 isUndefined x = x == undefinedValue
 
 --argsListS :: forall a r. (Show a, BuildList a r) => a -> r
 --argsListS x = Data.List.map show $ argsList x
 
 traceM :: String -> InterpM ()
-traceM s = do 
+traceM s = do
                f <- getFlags
                case elem Trace f of
-                   True -> liftIO $ putStrLn s 
+                   True -> liftIO $ putStrLn s
                    False -> return ()
 
− src/HJS/Interpreter/InterpM.hs~
@@ -1,581 +0,0 @@-{-
-   Note: Do not add 
-          {-# OPTIONS -fglasgow-exts #-}
-	  {-# OPTIONS -fallow-overlapping-instances  #-}
-	  {-# OPTIONS -fallow-incoherent-instances #-}
-   as this causes problems
-
--}
-
-module HJS.Interpreter.InterpM where
-
-import Control.Monad.Identity
-import Control.Monad.Error
-import Control.Monad.State 
-import System.IO.Unsafe
-
-import HJS.Parser.JavaScript hiding (Object)
-
-import HJS.Interpreter.InterpMDecl
-import {-# SOURCE #-} HJS.Interpreter.Interp
-
-import Data.Map as M
-import Data.List
-{-
-
-               VALUE
-
--}
-
-data PrimHint = HString | HNumber | HNone
-
--- These correspond to the ToX functions covered in the specification.
--- Converting from one type to another remaining within the Value type
-class Convert a where
-   typeOf :: a -> [Int]
-   typeOf _ = []
-   toBoolean :: a -> InterpM Value
-   toBoolean _ = return $ inj False
-   toNumber :: a -> Value
-   toNumber _ = inj (0::Int)
-   toString :: a -> InterpM Value
-   toString _ = return $ inj ""
-   toPrimitive :: PrimHint -> a  -> InterpM Value
-   toPrimitive  _ i = return $ undefinedValue
-
-
-
-instance (Convert a, Convert b) => Convert (Either a b) where
-   toBoolean (Left x) = toBoolean x
-   toBoolean (Right x) = toBoolean x
-   toNumber (Left x) = toNumber x
-   toNumber (Right x) = toNumber x
-   toString (Left x) = toString x
-   toString (Right x) = toString x
-   typeOf (Left x) = 0:typeOf x
-   typeOf (Right y) = 1:typeOf y
-   toPrimitive h (Left x) = toPrimitive h x
-   toPrimitive h (Right x) = toPrimitive h x
-
-   
-
-instance Convert Int where
-   toBoolean 0 = return $ inj False
-   toBoolean _ = return $ inj True
-   toNumber i = inj (i::Int)
-   toString i = return $ inj (show i)
-   toPrimitive _ i = return $ inj i
-
-
-instance Convert String where
-   toBoolean "" = return $ inj False
-   toBoolean _ = return $ inj True
-   toNumber s = inj $ ((read s)::Int)
-   toString s = return $ inj s
-   toPrimitive _ i = return $ inj i
-
-instance Convert Bool where
-   toBoolean b = return $ inj b
-   toNumber False = inj $ (0::Int)
-   toNumber True = inj $ (1::Int)
-   toString False = return $ inj "false"
-   toString True = return $ inj "true"
-   toPrimitive _ i = return $ inj i
-
-
-instance Convert Ref
-instance Convert Null where
-   toString _ = return $ inj "null"
-   toPrimitive _ i  = return $ inj i
-
-
-
-instance Convert Undefined where
-   toString _ = return $ inj "undefined"
-   toPrimitive _ i = return $ inj i
-
-
-instance Convert ()
-
-instance Convert [Int] where
-   toString i = return $ inj (show i)
-
-instance Convert [SourceElement] where
-   toString _ = return $ inj "<code>"
-
-instance Convert [String] where
-   toString ss = return $ inj (show ss)
-
-instance Convert CallValue
-
-instance Convert ObjId where
-   toString o = do
-                    v <- getProperty o "toString"
-		    case v == undefinedValue of
-                                False -> callFunction v [] o
-                                True -> return $ inj "[object]"
-                    
-   toPrimitive h o   = do
-                          m <- getProperty o "toString"
-                          case m == undefinedValue of
-                                False -> callFunction m [] o
-                                True -> return undefinedValue
-   toBoolean (ObjId i) = return $ inj True
-   toBoolean _ = return $ inj False
-
-
-instance Convert [ObjId]
-
-instance Ord SourceElement where
-    compare _ _ = EQ
-
-instance Eq SourceElement where
-    (==) _ _ = True
-
-class SubType sub sup where
-    inj :: sub -> sup
-    prj :: sup -> Maybe sub
-
-instance SubType a (Either a b) where
-   inj = Left
-   prj (Left x) = Just x
-   prj _ = Nothing
-
-instance SubType a b => SubType a (Either c b) where
-   inj = Right . inj
-   prj (Right a) = prj a
-   prj _ = Nothing
-
-instance SubType sub () where
-   inj _ = ()
-   prj _ = Nothing
-
-toObjId = prjObjId
-
-prjObjId :: Value -> ObjId
-prjObjId v = case prj v of 
-                      (Just s) -> s
-                      _        -> error $ "Impossible Error converting to ObjId" ++ (show v)
-
-prjInt :: Value -> Int
-prjInt v= case prj v of 
-                      (Just s) -> s
-                      _        -> error "Impossible Error"
-
-prjBool :: Value -> Bool
-prjBool v= case prj v of 
-                      (Just s) -> s
-                      _        -> error "Impossible Error"
-
-prjString :: Value -> String
-prjString v = case prj v of 
-                      (Just s) -> s
-                      _        -> error "Impossible Error"
-
-toValueList :: Value -> [Value]
-toValueList v = case prj v of 
-                      (Just (s::[Value])) -> s
-                      _        -> error "Impossible Error"
-
-toRealInt :: Convert a => a -> Int
-toRealInt v = case prj (toNumber v) of 
-                      (Just s) -> s
-                      _        -> error "Impossible Error"
-
-
-toRealString :: Convert a => a -> InterpM String
-toRealString v = do 
-		    s <- toString v
-                    return $ prjString s
-
-toRealBool :: Convert a => a -> InterpM Bool
-toRealBool v = do
-                  b <- toBoolean v
-                  return $ prjBool b 
-  
-
-typeOfString :: Value -> InterpM Value
-typeOfString v | typeOf v == typeOf undefinedValue = return $ inj "undefined"
-typeOfString v | typeOf v == typeOf nullValue = return $ inj "object"
-typeOfString v | typeOf v == typeOf trueValue = return $ inj "boolean"
-typeOfString v | typeOf v == typeOf zeroValue = return $ inj "number"
-typeOfString v | typeOf v == typeOf nullStringValue = return $ inj "string"
-typeOfString v | typeOf v == typeOf nullObjValue = return $ inj "object"
-typeOfString _ = return $ inj "unknown"
-
-
-
-instance Convert BreakContinue
-
-nullValue :: Value
-nullValue = inj Null
-
-undefinedValue :: Value
-undefinedValue = inj Undefined
-
-trueValue :: Value
-trueValue = inj True
-
-zeroValue :: Value
-zeroValue = inj (0::Int)
-
-nullStringValue :: Value
-nullStringValue = inj ""
-
-nullObjValue :: Value
-nullObjValue = inj ObjIdNull
-
-
-{-
-             OBJECT
-
--}
-
-
-
-
-
-
-getObject :: ObjId -> InterpM Object
-getObject i = do
-                   (_,os,p) <- get
-                   case M.lookup i os of 
-                      Just o -> return o
-                      Nothing -> throwInternalError "Object not found"
-               
-putObject :: Object -> InterpM ()
-putObject o = do
-
-                   (ctxs,os,p) <- get
-                   put (ctxs,M.insert (idd o) o os,p)
-              
-             
-getObjectProperty' :: Object -> String -> InterpM (Maybe ObjId)
-getObjectProperty' o k = do
-                            v <- getProperty' o k 
-                            case (prj v) of 
-                                  Just (id::ObjId) -> return $ Just id
-                                  Nothing -> return Nothing
-                         
-getPrototypeObject' o = do
-		            case M.lookup "__proto__" (properties o) of
-                 		    Just (v,_) -> do 
-                                                      case prj v of 
-                                                          Just (id::ObjId) -> return $ Just id
-                                                          Nothing -> return Nothing
-                                    Nothing -> return Nothing
-         
-
-getProperty' :: Object -> String -> InterpM Value
-getProperty' o k = do 
-                       case M.lookup k (properties o) of
-            		Just (v,_) -> return v
-                        Nothing -> do 
-                                     proto <- getPrototypeObject' o 
-                                     case proto  of 
-						  Nothing -> return $ inj Undefined
-					          Just p -> getProperty p k
-
-getProperty :: ObjId -> String -> InterpM Value
-getProperty id k = do
-                     o <- getObject id
-                     getProperty' o k
-
-
-putPropertyInternal id k v = do 
-			     o <- getObject id 
-		             cp <- canPut o k
-		             case cp of 
-				       True ->  do
-				   	     let o' = o { properties = M.insert k (v,[DontEnum]) (properties o)}
-			       	             putObject o'
-				       False -> return ()
-
-putProperty :: ObjId -> String -> Value -> InterpM ()
-putProperty id k v = do 
-                         traceM $ "putProperty" ++ (show id) ++ " " ++ k 
-                         o <- getObject id
-                         case klass o of 
-                                "Array" -> putArrayProperty id k v
-                                _ -> putObjectProperty id k v
-
-putObjectProperty id k v = do 
- 			               o <- getObject id 
-				       cp <- canPut o k
-				       case cp of 
-					       True ->  do
-						   	     let o' = o { properties = M.insert k (v,[]) (properties o)}
-							     putObject o'
-					       False -> return ()
-                  
-toUInt32 :: String -> Int       
-toUInt32 s = read s
-
-putArrayProperty id k v = do 
-                                 o <- getObject id
-                                 cp <- canPut o k
-                                 case cp of 
-                                     True ->  do
-                                                 len <- getProperty id "length"
-                                                 case prj len of  
-                                                      (Just (l::Int)) -> do 
-									     let idx = toUInt32 k
-                                                                                 newlen = if idx < l then l else idx + 1
-                                                                             putObjectProperty id k v
-                                                                             putObjectProperty id "length" (inj newlen)
-                                                      _ -> throwInternalError $ "Invalid value for array length: " ++ (show len)
-                                     False -> return () 
-                                                 
-
-checkAttr :: Object -> String -> Attribute -> InterpM Bool
-checkAttr o k attr = do attrs <- getAttr o k; return (elem attr attrs)
-
-getAttr :: Object -> String -> InterpM [Attribute]
-getAttr o k = case M.lookup k (properties o) of 
-                 Just (_,a) -> return a
-                 Nothing -> case prototype o of 
-                              Nothing -> return []
-                              Just p -> do 
-                                           p' <- getObject p
-                                           getAttr p' k
-
-putAttr o k attr = case M.lookup k (properties o) of 
-                 Just (v,attrs) -> do 
-			              let o' = o { properties = M.insert k (v,attr:attrs) (properties o)}
-  				      putObject o'
-                 Nothing -> case prototype o of 
-                              Nothing -> return ()
-                              Just p -> do 
-                                           p' <- getObject p
-                                           putAttr p' k attr
-
-
-canPut o k = do f <- checkAttr o k ReadOnly; return (not f)
-canEnum o k = do f <- checkAttr o k DontEnum; return (not f)
-
-
-hasProperty :: Object -> String -> Bool
-hasProperty o k =  M.member k (properties o)
-
-deleteProperty :: Object -> String -> Object
-deleteProperty o k = o { properties = M.delete k (properties o) }
-
--- Creates a new raw object and inserts it into the object store
-newObjectRaw :: String -> InterpM ObjId
-newObjectRaw k = do
-               (_,os,_) <- get
-               let id' = ObjId $ (size os)+1
-                   o = Object { idd = id', prototype = Nothing, klass=k, value=Nothing, properties = M.empty }
-               putObject o
-               return id'
-
-
-
-{-
-          VALUES
--}
-
-
--- Get value from environment if Value is a reference, return argument if it isn't, throwError if ref
--- doesn't reference anything.
-
--- Get the get function being called
-getCallee:: InterpM Value
-getCallee = do 
-	            (((_,_,_,c):_), _,_) <- get
-                    case c of 
-                        ObjIdNull -> return nullValue 
-                        _ -> return $ inj c
-
-getThis :: InterpM Value
-getThis = do 
-	  (((_,_,t,_):_), _,_) <- get
-          return $ inj t
-
-getValue :: Value -> InterpM Value
-getValue v = do 
-                 (((sc,_,_,_):_), _,_) <- get
-                 case prj v of 
-                     ((Just (Ref s))::Maybe Ref) -> getValue' sc s 
-                     ((Just (RefObj o s))::Maybe Ref) -> getProperty o s
-                     _ -> return v
-
-getObjectValue :: Value -> InterpM ObjId
-getObjectValue v = do
-                       ov <- getValue v
-                       case prj ov of 
-                             (Just (o::ObjId)) -> return o
-                             _ -> throwInternalError "Expecting to get an object value"
-
-getValue' :: [ObjId] -> String -> InterpM Value
-getValue' (c:cs) s = do
-                        p <- getProperty c s
-                        case prj p of 
-                            ((Just Undefined)::Maybe Undefined) -> getValue' cs s
-                            _ -> return p
-
-getValue' [] s = return $ inj Undefined
-
-
--- Put value into environment if Value is a reference, throw error if it isn't
-putValue :: Value -> Value -> InterpM ()
-putValue r v = do 
-	          ((_,vo,_,_):_,_,_) <- get
-                  case prj r of 
-			((Just (Ref s))::Maybe Ref) -> putProperty vo s v
-                        ((Just (RefObj o s))::Maybe Ref) -> putProperty o s v
-                        _ -> throwInternalError "Internal Error: Invalid Reference"
-
-setPrototype o = do
-                    c <- getThis
-                    p <- getProperty (toObjId c) "prototype"
-                    putPropertyInternal o "__proto__" p 
-
-setFuncProto fo  = do 
-                        v <- getValue  (inj $ Ref "Function")
-                        case prj v of 
-                             (Just (o::ObjId)) -> do getProperty o "prototype" >>= putProperty fo "__proto__"; return ()
-                             Nothing -> return $ inj (ObjId 2)
-
-newFuncObject :: [String] -> [SourceElement] -> InterpM Value -> InterpM ObjId
-newFuncObject args ses fc = do
-                             ((sc,_,_,_):_,_,_) <- get
-			     fo <- newObjectRaw "Function"
-		             setFuncProto fo
-                             p <- newObjectRaw "Object"
-                             putPropertyInternal p "__proto__" (inj $ ObjId 2)
-                             putProperty fo "prototype" (inj p)
-                             putProperty fo "Scope" (inj sc)
-                             putProperty fo "Call" (inj (CallJS ses))
-                             putProperty fo "Args" (inj args)
-                             cf <- newBuiltInFunction [] fc 
-			     putProperty fo "Construct" (inj cf)
-                             return fo
-     
-newBuiltInFunction :: [String] -> InterpM Value -> InterpM ObjId           
-newBuiltInFunction args f = do                                        
-  	             	     ((sc,_,_,_):_,_,_) <- get
-			     fo   <- newObjectRaw "Function"
-                             p <- newObjectRaw "Object"
-                             putProperty fo "prototype" (inj p)
-                             putProperty fo "Scope" (inj sc)
-                             putProperty fo "Call" (inj (CallBuiltIn f))
-                             putProperty fo "Args" (inj args)
-                             return fo	    
-                                                  
-
-{-		      
--- Some test objects
-
-newObject = Object { prototype = Nothing, klass="Object", value=Nothing, properties = M.empty }
-
-objectHeap = M.empty
-
-o1 = newObject { klass="Top" }
-o2 = newObject { klass="Child", prototype=Just o1}
-
-o1' = putProperty o1 "x" (inj (1::Int)::Value)
--}
-
-
-
-
-throwReturn v = throwError (ThrowReturn v)
-throwInternalError s = throwError (ThrowInternalError s)
-throwBreak s = throwError (ThrowBreak s)
-throwContinue s = throwError (ThrowContinue s)
-throwTypeError s = throwError (ThrowTypeError s)
-throwException v = throwError (ThrowException v)
-
-handleReturn (ThrowReturn v) = return v
-handleReturn s = throwError s
-
-handleBreak (ThrowBreak s) = return False
-handleBreak e = throwError e
-
-handleContinue (ThrowContinue s) = return True
-handleContinue e = throwError e
-
-
-
--- The order of Monad composition is important. If you don't then when 
--- throwing you lose state
--- type InterpM  = ErrorT Throwable (StateT JSState Identity)
---type InterpM  = StateT JSState (ErrorT Throwable Identity)
-
-instance Error Throwable where
-   noMsg = ThrowInternalError "An Error"
-   strMsg s = ThrowInternalError s
-
-emptyState = ([], M.empty,(0::Int,0::Int))
-
---putGlobalContext :: InterpM ()
---putGlobalContext = do
---                     put globalContext
-
-putPosition p = do 
-                    (cs,h,_) <- get 
-                    put (cs,h,p) 
-
-pushContext :: Ctx -> InterpM ()
-pushContext c = do 
-                     (cs,h,p) <- get 
-                     put (c:cs,h,p)
-
-popContext :: InterpM ()
-popContext = do
-                (c:cs,h,p) <- get
-                put (cs,h,p)
-
---globalContext = ( [([ObjId 1],ObjId 1,ObjId 1)], M.fromList [(ObjId 1, Object { idd = ObjId 1, prototype = Nothing, klass="_global", value=Nothing, properties = M.empty })])
-
-
-
--- instance Show a => Show (InterpM a) where
---      show s = show $ runIt s
-
-
-getArgs :: InterpM [Value]
-getArgs = do
-             arg' <- getValue (inj $ Ref "arguments")
-             let arg = prjObjId arg'
-             len <- getProperty arg "length"
-             mapM (\x -> getProperty arg (show x)) [0.. (toRealInt len)-1]
-
-getPropertyNames :: ObjId -> InterpM [String]
-getPropertyNames id = do
-                             o <- getObject id
-                             getPropertyNames' o
-
-getPropertyNames' :: Object -> InterpM [String]
-getPropertyNames' o  = do 
-                               let ks = keys $ properties o 
-                               ks <- filterM (canEnum o) ks
-                               p <- getProperty' o "__proto__"
-                               case prj p of 
-                                    (Just (i::ObjId)) -> do
-                                                             ks' <- getPropertyNames i
-							     return $ Data.List.union ks ks'
-                                    _ -> return ks
-
-
-                                  
-                                
-                                
--- All internal new object calls actions must go through this.                                
-newCall name args = do 
-                        o <- getValue name 
-                        case (prj o) of 
-                                    (Just (o::ObjId)) -> do 
-                                                          fo <- getProperty o "Construct"
-                                                          callFunction fo args o
-                                    _ -> throwInternalError $ "Type Error: Not an Object" ++ (show o)
-                       
-                        
-isUndefined x = x == undefinedValue
-
-traceM :: String -> InterpM ()
-traceM s = return $ unsafePerformIO $ do putStrLn s; return ()
-
-          
-             
− src/HJS/Interpreter/InterpMDecl.hs~
@@ -1,77 +0,0 @@-module HJS.Interpreter.InterpMDecl where
-
-import Control.Monad.Identity
-import Control.Monad.Error
-import Control.Monad.State 
-
-import Data.Map as M
-
-import HJS.Parser.JavaScript hiding (Object)
-
-data Ref = Ref String | RefObj ObjId String deriving (Eq,Show,Ord)
-
-data ObjId = ObjId Int | ObjIdNull deriving (Eq,Show,Ord)
-
-data Undefined = Undefined deriving (Eq,Show,Ord)
-data Null = Null deriving (Eq,Show,Ord)
-
-
--- Either JS source from a function or a built in function
-data CallValue = CallJS [SourceElement] | CallBuiltIn (InterpM Value)
-
-data BreakContinue = Break | Continue deriving (Show,Eq,Ord)
-
-data ArgList = ArgList [String] | VarArgList
-
--- Think I should be including Ref (ie what is returned by LeftExpr) into the Value type.
-type Value =  Either Int                       -- Primitive values
-            ( Either String 
-            ( Either Bool                              
-            ( Either Undefined 
-            ( Either Null 
-                                               -- Internal values
-            ( Either ObjId
-            ( Either Ref                       -- Reference
-            ( Either [ObjId]                   -- List of object ids
-            ( Either CallValue                 -- Code, used 'Call' property of Function object. 
-            ( Either [String]                  -- List of argument names
-	    ( Either BreakContinue
-              ()))))))))))
-
-
-type InterpM  = ErrorT Throwable (StateT JSState Identity)
-
--- Execution Context = Scope chain, variable object, this object, current function
-type Ctx = ([ObjId],ObjId,ObjId,ObjId)
-type JSState =  ([Ctx],Map ObjId Object,(Int,Int))
-
-
-
-data Throwable = ThrowReturn Value 
-	       | ThrowBreak (Maybe String)
-	       | ThrowContinue (Maybe String)
-	       | ThrowException Value
-	       | ThrowTypeError String
-	       | ThrowInternalError String 
-		 deriving Show
-
--- Section 8.6.2
-data Object = Object {
-                      idd :: ObjId,
-		      prototype :: Maybe ObjId,
-		      klass :: String,
-		      value :: Maybe Value,
-		      properties :: M.Map String (Value,[Attribute]) 
-		     } deriving Show
-
-data Attribute = ReadOnly | DontEnum | DontDelete | Internal deriving (Eq,Show)
-
-instance Show CallValue where
-   show (CallJS x) = show x
-   show (CallBuiltIn _) = show "<builtin>"
-
-instance Ord CallValue where
-   compare _ _ = EQ
-
-instance Eq CallValue where
-   (==) _ _ = True
− src/HJS/Interpreter/Printf.hs~
@@ -1,278 +0,0 @@------------------------------------------------------------------------------
--- |
--- Module      :  Text.Printf
--- Copyright   :  (c) Lennart Augustsson, 2004
--- License     :  BSD-style (see the file libraries/base/LICENSE)
--- 
--- Maintainer  :  lennart@augustsson.net
--- Stability   :  provisional
--- Portability :  portable
---
--- A C printf like formatter.
---
------------------------------------------------------------------------------
-
-module Text.Printf(
-   printf, hPrintf,
-   PrintfType, HPrintfType, PrintfArg, IsChar
-) where
-
-import Prelude
-import Data.Array
-import Data.Char
-import Numeric(showEFloat, showFFloat, showGFloat)
-import System.IO
-
--------------------
-
--- | Format a variable number of arguments with the C-style formatting string.
--- The return value is either 'String' or @('IO' a)@.
---
--- The format string consists of ordinary characters and /conversion
--- specifications/, which specify how to format one of the arguments
--- to printf in the output string.  A conversion specification begins with the
--- character @%@, followed by one or more of the following flags:
---
--- >    -      left adjust (default is right adjust)
--- >    0      pad with zeroes rather than spaces
---
--- followed optionally by a field width:
--- 
--- >    num    field width
--- >    *      as num, but taken from argument list
---
--- followed optionally by a precision:
---
--- >    .num   precision (number of decimal places)
---
--- and finally, a format character:
---
--- >    c      character               Char, Int, Integer
--- >    d      decimal                 Char, Int, Integer
--- >    o      octal                   Char, Int, Integer
--- >    x      hexadecimal             Char, Int, Integer
--- >    u      unsigned decimal        Char, Int, Integer
--- >    f      floating point          Float, Double
--- >    g      general format float    Float, Double
--- >    e      exponent format float   Float, Double
--- >    s      string                  String
---
--- Mismatch between the argument types and the format string will cause
--- an exception to be thrown at runtime.
---
--- Examples:
---
--- >   > printf "%d\n" (23::Int)
--- >   23
--- >   > printf "%s %s\n" "Hello" "World"
--- >   Hello World
--- >   > printf "%.2f\n" pi
--- >   3.14
---
-printf :: (PrintfType r) => String -> r
-printf fmt = spr fmt []
-
--- | Similar to 'printf', except that output is via the specified
--- 'Handle'.  The return type is restricted to @('IO' a)@.
-hPrintf :: (HPrintfType r) => Handle -> String -> r
-hPrintf hdl fmt = hspr hdl fmt []
-
--- |The 'PrintfType' class provides the variable argument magic for
--- 'printf'.  Its implementation is intentionally not visible from
--- this module. If you attempt to pass an argument of a type which
--- is not an instance of this class to 'printf' or 'hPrintf', then
--- the compiler will report it as a missing instance of 'PrintfArg'.
-class PrintfType t where
-    spr :: String -> [UPrintf] -> t
-
--- | The 'HPrintfType' class provides the variable argument magic for
--- 'hPrintf'.  Its implementation is intentionally not visible from
--- this module.
-class HPrintfType t where
-    hspr :: Handle -> String -> [UPrintf] -> t
-
-{- not allowed in Haskell 98
-instance PrintfType String where
-    spr fmt args = uprintf fmt (reverse args)
--}
-instance (IsChar c) => PrintfType [c] where
-    spr fmt args = map fromChar (uprintf fmt (reverse args))
-
-instance PrintfType (IO a) where
-    spr fmt args = do
-	putStr (uprintf fmt (reverse args))
-	return undefined
-
-instance HPrintfType (IO a) where
-    hspr hdl fmt args = do
-	hPutStr hdl (uprintf fmt (reverse args))
-	return undefined
-
-instance (PrintfArg a, PrintfType r) => PrintfType (a -> r) where
-    spr fmt args = \ a -> spr fmt (toUPrintf a : args)
-
-instance (PrintfArg a, HPrintfType r) => HPrintfType (a -> r) where
-    hspr hdl fmt args = \ a -> hspr hdl fmt (toUPrintf a : args)
-
-class PrintfArg a where
-    toUPrintf :: a -> UPrintf
-
-instance PrintfArg Char where
-    toUPrintf c = UChar c
-
-{- not allowed in Haskell 98
-instance PrintfArg String where
-    toUPrintf s = UString s
--}
-instance (IsChar c) => PrintfArg [c] where
-    toUPrintf s = UString (map toChar s)
-
-instance PrintfArg Int where
-    toUPrintf i = UInt i
-
-instance PrintfArg Integer where
-    toUPrintf i = UInteger i
-
-instance PrintfArg Float where
-    toUPrintf f = UFloat f
-
-instance PrintfArg Double where
-    toUPrintf d = UDouble d
-
-class IsChar c where
-    toChar :: c -> Char
-    fromChar :: Char -> c
-
-instance IsChar Char where
-    toChar c = c
-    fromChar c = c
-
--------------------
-
-data UPrintf = UChar Char | UString String | UInt Int | UInteger Integer | UFloat Float | UDouble Double
-
-uprintf :: String -> [UPrintf] -> String
-uprintf ""       []       = ""
-uprintf ""       (_:_)    = fmterr
-uprintf ('%':'%':cs) us   = '%':uprintf cs us
-uprintf ('%':_)  []       = argerr
-uprintf ('%':cs) us@(_:_) = fmt cs us
-uprintf (c:cs)   us       = c:uprintf cs us
-
-fmt :: String -> [UPrintf] -> String
-fmt cs us =
-	let (width, prec, ladj, zero, cs', us') = getSpecs False False cs us
-	    adjust (pre, str) = 
-		let lstr = length str
-		    lpre = length pre
-		    fill = if lstr+lpre < width then take (width-(lstr+lpre)) (repeat (if zero then '0' else ' ')) else ""
-		in  if ladj then pre ++ str ++ fill else if zero then pre ++ fill ++ str else fill ++ pre ++ str
-        in
-	case cs' of
-	[]     -> fmterr
-	c:cs'' ->
-	    case us' of
-	    []     -> argerr
-	    u:us'' ->
-		(case c of
-		'c' -> adjust ("", [toEnum (toint u)])
-		'd' -> adjust (fmti u)
-		'x' -> adjust ("", fmtu 16 u)
-		'o' -> adjust ("", fmtu 8  u)
-		'u' -> adjust ("", fmtu 10 u)
-		'e' -> adjust (dfmt' c prec u)
-		'f' -> adjust (dfmt' c prec u)
-		'g' -> adjust (dfmt' c prec u)
-		's' -> adjust ("", tostr u)
-		c   -> perror ("bad formatting char " ++ [c])
-		 ) ++ uprintf cs'' us''
-
-fmti (UInt i)     = if i < 0 then
-			if i == -i then fmti (UInteger (toInteger i)) else ("-", itos (-i))
-		    else
-			("", itos i)
-fmti (UInteger i) = if i < 0 then ("-", itos (-i)) else ("", itos i)
-fmti (UChar c)    = fmti (UInt (fromEnum c))
-fmti u		  = baderr
-
-fmtu b (UInt i)     = if i < 0 then
-			  if i == -i then itosb b (maxi - toInteger (i+1) - 1) else itosb b (maxi - toInteger (-i))
-		      else
-			  itosb b (toInteger i)
-fmtu b (UInteger i) = itosb b i
-fmtu b (UChar c)    = itosb b (toInteger (fromEnum c))
-fmtu b u            = baderr
-
-maxi :: Integer
-maxi = (toInteger (maxBound::Int) + 1) * 2
-
-toint (UInt i)     = i
-toint (UInteger i) = toInt i
-toint (UChar c)    = fromEnum c
-toint u		   = baderr
-
-tostr (UString s) = s
-tostr u		  = baderr
-
-itos n = 
-	if n < 10 then 
-	    [toEnum (fromEnum '0' + toInt n)]
-	else
-	    let (q, r) = quotRem n 10 in
-	    itos q ++ [toEnum (fromEnum '0' + toInt r)]
-
-chars = array (0,15) (zipWith (,) [0..] "0123456789abcdef")
-itosb :: Integer -> Integer -> String
-itosb b n = 
-	if n < b then 
-	    [chars!n]
-	else
-	    let (q, r) = quotRem n b in
-	    itosb b q ++ [chars!r]
-
-stoi :: Int -> String -> (Int, String)
-stoi a (c:cs) | isDigit c = stoi (a*10 + fromEnum c - fromEnum '0') cs
-stoi a cs                 = (a, cs)
-
-getSpecs :: Bool -> Bool -> String -> [UPrintf] -> (Int, Int, Bool, Bool, String, [UPrintf])
-getSpecs l z ('-':cs) us = getSpecs True z cs us
-getSpecs l z ('0':cs) us = getSpecs l True cs us
-getSpecs l z ('*':cs) us = 
-        case us of
-        [] -> argerr
-        nu : us' ->
-	    let n = toint nu
-		(p, cs'', us'') =
-		    case cs of
-                    '.':'*':r -> case us' of { [] -> argerr; pu:us'' -> (toint pu, r, us'') }
-		    '.':r     -> let (n, cs') = stoi 0 r in (n, cs', us')
-		    _         -> (-1, cs, us')
-	    in  (n, p, l, z, cs'', us'')
-getSpecs l z ('.':cs) us =
-	let (p, cs') = stoi 0 cs
-	in  (0, p, l, z, cs', us)
-getSpecs l z cs@(c:_) us | isDigit c =
-	let (n, cs') = stoi 0 cs
-	    (p, cs'') = case cs' of
-			'.':r -> stoi 0 r
-			_     -> (-1, cs')
-	in  (n, p, l, z, cs'', us)
-getSpecs l z cs       us = (0, -1, l, z, cs, us)
-
-dfmt' c p (UDouble d) = dfmt c p d
-dfmt' c p (UFloat f)  = dfmt c p f
-dfmt' c p u           = baderr
-
-dfmt c p d = 
-	case (case c of 'e' -> showEFloat; 'f' -> showFFloat; 'g' -> showGFloat) 
-               (if p < 0 then Nothing else Just p) d "" of
-	'-':cs -> ("-", cs)
-	cs     -> ("" , cs)
-
-perror s = error ("Printf.printf: "++s)
-fmterr = perror "formatting string ended prematurely"
-argerr = perror "argument list ended prematurely"
-baderr = perror "bad argument"
-
-toInt :: (Integral a) => a -> Int
-toInt x = fromInteger (toInteger x)
− src/HJS/Interpreter/String.hs~
@@ -1,38 +0,0 @@-module HJS.Interpreter.String where
-
-import Control.Monad.Identity
-import Control.Monad.Error
-import Control.Monad.State 
-
-import HJS.Interpreter.InterpMDecl
-import HJS.Interpreter.InterpM
-import HJS.Interpreter.ObjectBasic
-import HJS.Interpreter.Regex
-import HJS.Interpreter.Array
-
-               
-stringConstructor :: InterpM Value   
-stringConstructor = do
-                        args <- getArgs 
-                        o <- newObject "String"
-                        putPropertyInternal o "Value" (head args)
-			setPrototype o
-                        return (inj o)
-                        
-
-match :: InterpM Value
-match = do
-              t <- getThis
-              (re:_) <- getArgs
-              s <- getProperty (toObjId t) "Value" >>= toRealString 
-              p <- getProperty (toObjId re) "Match" >>= toRealString
-	      let res = case simpleMatch p s  of
-                             Nothing -> []
-                             Just ss -> ss
-              let res' = map (\x -> (inj (x::String))::Value) res
-              o <- newArrayObject res'
-              return $ inj o
-              
-
-addStringBuiltIn newConstructorWith = do 
-                 newConstructorWith "String" stringConstructor
− src/HJS/Interpreter/T.hs~
@@ -1,5 +0,0 @@-module T where
-
-import Debug.Trace
-
-doit = trace "hello" 1
− src/HJS/Interpreter/Value.hs
− src/HJS/Interpreter/VarArgs.hs~
@@ -1,13 +0,0 @@-{-# OPTIONS -fglasgow-exts #-}
-module VarArg where
-
-class BuildList a r  | r-> a where
-    build' :: [a] -> a -> r
-
-instance BuildList a [a] where
-    build' l x = reverse$ x:l
-
-instance BuildList a r => BuildList a (a->r) where
-    build' l x y = build'(x:l) y
-
-build x = build' [] x
src/Main.hs view
@@ -1,5 +1,5 @@--- | 
--- HJS Haskell Javascript Interpreter 
+-- |
+-- HJS Haskell Javascript Interpreter
 -- (c) Mark Wassell 2007
 -- See LICENSE file for license details
 
@@ -7,7 +7,7 @@ module Main(main,parseProgram,parseTest,parseFile) where
 
 
-import Data.ByteString.Char8(split,pack,unpack,join,readInt)
+import Data.ByteString.Char8(split,pack,unpack,intercalate,readInt)
 import Data.List
 import qualified Data.Map as M
 import Data.Ord
@@ -39,7 +39,7 @@ parseFile flags fname = do
                           ifM (elem ShowProgress flags) (putStr $ "Parsing \"" ++ fname) (return ())
                           s <- readFile fname
-                          handleResult flags $ parseProgram s 
+                          handleResult flags $ parseProgram s
 
 handleResult flags (Right r) | (elem ShowProgress flags) = putStrLn ("\"  ok")
                              | (elem ShowAST flags)      = putStrLn ("\" ok " ++ show r)
@@ -57,8 +57,8 @@ 
 runString :: [RunFlag] -> String -> IO Bool
 runString flags s = do
-                 case parseProgram s of 
-                        Right r -> runProgram flags   r 
+                 case parseProgram s of
+                        Right r -> runProgram flags   r
                         Left s -> putStrLn (show s) >> return False
 
 runTest = testFiles "c:/Mark/MyDevelopments/haskell/HJS/hjs-0.2/testsuite" (runFile [])
@@ -68,16 +68,16 @@          s <- getArgs
 	 main' s
 
-main' args = do 
+main' args = do
          (opt, files) <- interpOpts args
-         case (foldr (\x s -> case x of Version -> (True || s); _ -> s) False opt) of 
+         case (foldr (\x s -> case x of Version -> (True || s); _ -> s) False opt) of
              True -> putStrLn "HJS - JavaScript Parser - Version 0.1"
              _ -> return ()
          let vf = foldr (\x s -> case x of (Verbose f) -> (f:s);_ -> s) [] opt
          mapM_ (runFile []) files
-	
 
-parseTest = do 
+
+parseTest = do
 	     -- testFiles "c:/Mark/MyDevelopments/haskell/HJS/hjs-0.2/testsuite" (parseFile [ShowProgress])
 	     testFiles "c:/Mark/MyDevelopments/haskell/HJS/hjs-0.2/testsuite/parsingonly" (parseFile [ShowProgress])
 
@@ -88,33 +88,33 @@ 			    mapM_ action  fileList
 
 
-             
+
 getTestFiles dirName  = do
           dirList <- getDirectoryContents dirName
           return $  map (\f -> dirName ++ "/" ++ f) $
-                    map unpack $ 
-	            map (Data.ByteString.Char8.join (pack "_"))  $ 
-		    sortBy (comparing (readInt . head)) $ 
-		    filter (\l -> (<=) 2 (length l)) $ 
-		    map (split '_' . pack) $ 
+                    map unpack $
+	            map (Data.ByteString.Char8.intercalate (pack "_"))  $
+		    sortBy (comparing (readInt . head)) $
+		    filter (\l -> (<=) 2 (length l)) $
+		    map (split '_' . pack) $
 	            filter (\x -> last x /= '~' || head x == '.' ) dirList
 
 
 
-    
-data Flag  = Verbose VFlag | Version  
+
+data Flag  = Verbose VFlag | Version
 		 deriving Show
-    
+
 options :: [OptDescr Flag]
 options =
      [ Option ['v']     ["verbose"] (OptArg vflag "LEVEL" )       "=1 show progrss, =2 show errors =3 show AST"
      , Option ['V','?'] ["version"] (NoArg Version)       "show version number"
      ]
-    
+
 vflag :: Maybe String -> Flag
 vflag Nothing = Verbose Quiet
 vflag (Just s) = let s' = filter (\c -> not $ isSpace c) s
-                 in case s' of 
+                 in case s' of
                           "1" -> Verbose ShowProgress
    		          "2" -> Verbose ShowErrors
                           "3" -> Verbose ShowAST
@@ -123,16 +123,16 @@ --inp,outp :: Maybe String -> Flag
 --outp = Output . fromMaybe "stdout"
 --inp  = Input  . fromMaybe "stdin"
-    
+
 interpOpts :: [String] -> IO ([Flag], [String])
-interpOpts argv = 
+interpOpts argv =
        case getOpt Permute options argv of
           (o,n,[]  ) -> return (o,n)
           (_,_,errs) -> ioError (userError (concat errs ++ usageInfo header options))
       where header = "Usage: hjs [OPTION...] files..."
 
 
-ifM a b c = do 
-	        case a of 
+ifM a b c = do
+	        case a of
 		   True -> b
-                   False -> c  +                   False -> c
− src/Main.hs~
@@ -1,142 +0,0 @@--- | 
--- HJS Haskell Javascript Interpreter 
--- (c) Mark Wassell 2007
--- See LICENSE file for license details
-
-
-module Main(main,parseProgram,parseTest,parseFile) where
-
-
-import Data.ByteString.Char8(split,pack,unpack,join,readInt)
-import Data.List
-import qualified Data.Map as M
-import Data.Ord
-import Data.Char
-
-import System.Console.GetOpt
-import Data.Maybe ( fromMaybe )
-
-import Control.Monad.Identity
-import Control.Monad.Error
-import Control.Monad.State
-
-import System.Directory
-import System.Environment
-
--- import HJS.Parser.Lexer  
---import HJS.Parser.LexerM 
---import HJS.Parser.JavaScriptParser -- hiding (startState)
-import HJS.Parser
-import HJS.Parser.JavaScript
---import HJS.Parser.ParserMonad
-
-import HJS.Interpreter.InterpM hiding (getArgs)
-import HJS.Interpreter
-
-data VFlag = Quiet | ShowProgress | ShowErrors | ShowAST | ShowHeap deriving (Show,Eq)
-
-
-
--- Parse a file with supplied flags
-parseFile :: [VFlag] -> String -> IO ()
-parseFile flags fname = do
-                          ifM (elem ShowProgress flags) (putStr $ "Parsing \"" ++ fname) (return ())
-                          s <- readFile fname
-                          handleResult flags $ parseProgram s 
-
-handleResult flags (Right r) | (elem ShowProgress flags) = putStrLn ("\"  ok")
-                             | (elem ShowAST flags)      = putStrLn ("\" ok " ++ show r)
-                             | otherwise = return ()
-handleResult flags (Left r)  | (elem ShowProgress flags) = putStrLn ("\"  failed")
-                             | (elem ShowErrors flags)   = putStrLn  ("\" failed" ++ show r)
-                             | otherwise = return ()
-
-
-
-
-runFile flags fname = do
-               putStr $ "Running: " ++ fname
-               s <- readFile fname
-               runString flags s >>= putStrLn . show
-
-runString :: Bool -> String -> IO Bool
-runString flags s = do
-                 case parseProgram s of 
-                        Right r -> runProgram flags  r 
-                        Left s -> putStrLn (show s) >> return False
-
-runTest = testFiles "c:/Mark/MyDevelopments/haskell/HJS/hjs-0.2/testsuite" (runFile False)
-
-
-main = do
-         s <- getArgs
-	 main' s
-
-main' args = do 
-         (opt, files) <- interpOpts args
-         case (foldr (\x s -> case x of Version -> (True || s); _ -> s) False opt) of 
-             True -> putStrLn "HJS - JavaScript Parser - Version 0.1"
-             _ -> return ()
-         let vf = foldr (\x s -> case x of (Verbose f) -> (f:s);_ -> s) [] opt
-         mapM_ (parseFile vf) files
-	
-
-parseTest = do 
-	     -- testFiles "c:/Mark/MyDevelopments/haskell/HJS/hjs-0.2/testsuite" (parseFile [ShowProgress])
-	     testFiles "c:/Mark/MyDevelopments/haskell/HJS/hjs-0.2/testsuite/parsingonly" (parseFile [ShowProgress])
-
-
-
-
-testFiles dir action =   do fileList <- getTestFiles dir
-			    mapM_ action  fileList
-
-
-             
-getTestFiles dirName  = do
-          dirList <- getDirectoryContents dirName
-          return $  map (\f -> dirName ++ "/" ++ f) $
-                    map unpack $ 
-	            map (Data.ByteString.Char8.join (pack "_"))  $ 
-		    sortBy (comparing (readInt . head)) $ 
-		    filter (\l -> (<=) 2 (length l)) $ 
-		    map (split '_' . pack) $ 
-	            filter (\x -> last x /= '~' || head x == '.' ) dirList
-
-
-
-    
-data Flag  = Verbose VFlag | Version  
-		 deriving Show
-    
-options :: [OptDescr Flag]
-options =
-     [ Option ['v']     ["verbose"] (OptArg vflag "LEVEL" )       "=1 show progrss, =2 show errors =3 show AST"
-     , Option ['V','?'] ["version"] (NoArg Version)       "show version number"
-     ]
-    
-vflag :: Maybe String -> Flag
-vflag Nothing = Verbose Quiet
-vflag (Just s) = let s' = filter (\c -> not $ isSpace c) s
-                 in case s' of 
-                          "1" -> Verbose ShowProgress
-   		          "2" -> Verbose ShowErrors
-                          "3" -> Verbose ShowAST
-                          _ -> error $ "Cannot parse verbosity option " ++ s'
-
---inp,outp :: Maybe String -> Flag
---outp = Output . fromMaybe "stdout"
---inp  = Input  . fromMaybe "stdin"
-    
-interpOpts :: [String] -> IO ([Flag], [String])
-interpOpts argv = 
-       case getOpt Permute options argv of
-          (o,n,[]  ) -> return (o,n)
-          (_,_,errs) -> ioError (userError (concat errs ++ usageInfo header options))
-      where header = "Usage: hjs [OPTION...] files..."
-
-
-ifM a b c = do 
-	        case a of 
-		   True -> b
-                   False -> c  
− testsuite/16_literals.js~
@@ -1,43 +0,0 @@-const GLOBAL = this;
-
-var tokens = [
-
-    "END",
-
-    // Operators and punctuators.  Some pair-wise order matters, e.g. (+, -)
-    // and (UNARY_PLUS, UNARY_MINUS).
-    "\n", ";"];
-
-var opTypeNames = {
-    '\n':   "NEWLINE",
-    ';':    "SEMICOLON",
-    ',':    "COMMA"
-};
-
-var assignOps = ['|', '^', '&', '<<', '>>', '>>>', '+', '-', '*', '/', '%'];
-
-function eval(s) {
-	a=-1;
-}
-
-var global = {
-    // Value properties.
-    NaN: NaN, Infinity: Infinity, undefined: undefined,
-
-
-   
-
-    // Exte
-    snarf: snarf, evaluate: evaluate,
-    load: function load(s) {
-        if (typeof s != "string")
-            return s;
- 
-        evaluate(snarf(s), s, 1);
-    },
-    print: print, version: null
-};
-
-function eval(s) {
-;
-}