--- a/ast/Decl.d	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,137 +0,0 @@
-module ast.Decl;
-
-import ast.Expr;
-
-/**
-  The base class for all Declarations. 
-  
-  Declarations comes in two forms:
-
-    $(OL
-    $(LI members, such as variables and functions.)
-    $(LI types, such as classes, structs.))
-
-  */
-class Decl
-{
-
-    /// Method for doing cast(FunctionDecl)
-    FunctionDecl asFunctionDecl() { return null;}
-
-    /// Returns true if it is a FunctionDecl
-    bool isFunctionDecl() { return false;}
-
-    /// Method for doing cast(VarDecl)
-    VarDecl asVarDecl() { return null;}
-
-    /// Returns true if it is a VarDecl
-    bool isVarDecl() { return false;}
-
-    /// Method for doing cast(StructDecl)
-    StructDecl asStructDecl() { return null;}
-
-    /// Returns true if it is a StructDecl
-    bool isStructDecl() { return false;}
-
-    /// Method for doing cast(ClassDecl)
-    ClassDecl asClassDecl() { return null;}
-
-    /// Returns true if it is a ClassDecl
-    bool isClassDecl() { return false;}
-
-    /// Method for doing cast(InterfaceDecl)
-    InterfaceDecl asInterfaceDecl() { return null;}
-
-    /// Returns true if it is a InterfaceDecl
-    bool isInterfaceDecl() { return false;}
-
-    /// Method for doing cast(TypedefDecl)
-    TypedefDecl asTypedefDecl() { return null;}
-
-    /// Returns true if it is a TypedefDecl
-    bool isTypedefDecl() { return false;}
-}
-
-/**
-  The FunctionDecl contains a set of VarDecls, being the parameters of the
-  method. It also contains a potentiel list of statements.
-  */
-class FunctionDecl : Decl
-{
-    /// Returns the parameters of the method.
-    VarDecl[] getParams() { return params;}
-    /// Return the parameter on a given index.
-    VarDecl getParam(int index) { return params[index];}
-    /// Returns the number of parameters.
-    int getNumberOfParamst() { return params.length;}
-    /**
-      Returns the number of required arguments, that should be given to
-      call this method.
-      */
-    int getMinimumNumberOfParams() 
-    { 
-        assert(0, "Unimplemented");
-        return 0;
-    }
-
-    override FunctionDecl asFunctionDecl() { return this;}
-    override bool isFunctionDecl() { return true;}
-
-private:
-    VarDecl[] params;
-}
-
-/**
-  The VarDecl contains as a minimum a Type. As an addition, i will also
-  in most cases contain an Identifier that it'll be reconized by and in
-  some cases it will also contain an expression that'll be it initializer.
-
-  Some cases to check:
-
-  $(UL
-      $(LI
-          If the VarDecl is a param in a FunctionDecl the initializer, if
-          present, should be a constant expression(Enum, Number, String 
-          or the like).
-        )
-    )
-  */
-class VarDecl : Decl
-{
-    /// Return true if the VarDecl has an identifier/name.
-    bool hasIdentifier() { return !(identifier is null);}
-    /// Return true if the VarDecl has en initializer.
-    bool hasInitializer() { return !(initializer is null);}
-
-    override VarDecl asVarDecl() { return this;}
-    override bool isVarDecl() { return true;}
-    
-private:
-    Identifier identifier;
-    Expr initializer;
-}
-
-class StructDecl : Decl
-{
-    override StructDecl asStructDecl() { return this;}
-    override bool isStructDecl() { return true;}
-}
-
-class ClassDecl : Decl
-{
-    override ClassDecl asClassDecl() { return this;}
-    override bool isClassDecl() { return true;}
-}
-
-class InterfaceDecl : Decl
-{
-    override InterfaceDecl asInterfaceDecl() { return this;}
-    override bool isInterfaceDecl() { return true;}
-}
-
-class TypedefDecl : Decl
-{
-    override TypedefDecl asTypedefDecl() { return this;}
-    override bool isTypedefDecl() { return true;}
-}
-

--- a/ast/Expr.d	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,203 +0,0 @@
-module ast.Expr;
-
-/**
-  The base class for all Expressions.
-  */
-class Expr
-{
-    /// Get the type of the Expr
-    Object getType() 
-    {
-        assert(0, "Unimplemented");
-        return null;
-    }
-
-    /// Set the type of the Expr
-    void setType(Object type) 
-    {
-        assert(0, "Unimplemented");
-    }
-
-    /// Returns true if the Expr can be compile-time evaluated.
-    bool isConstantExpr() { return false; }
-
-    NumberLiteral asNumberLiteral() { return null; }
-    bool isNumberLiteral() { return false; }
-
-    StringLiteral asStringLiteral() { return null; }
-    bool isStringLiteral() { return false; }
-
-    ArrayLiteral asArrayLiteral() { return null; }
-    bool isArrayLiteral() { return false; }
-
-    Assign asAssign() { return null; }
-    bool isAssign() { return false; }
-
-    Binary asBinary() { return null; }
-    bool isBinary() { return false; }
-
-    Negate asNegate() { return null; }
-    bool isNegate() { return false; }
-
-    Deref asDeref() { return null; }
-    bool isDeref() { return false; }
-
-    AddressOf asAddressOf() { return null; }
-    bool isAddressOf() { return false; }
-
-    Index asIndex() { return null; }
-    bool isIndex() { return false; }
-
-    Identifier asIdentifier() { return null; }
-    bool isIdentifier() { return false; }
-
-    Member asMember() { return null; }
-    bool isMember() { return false; }
-
-private:
-/// FIXME: Add DType? here
-}
-
-/**
-  NumberLiteral
-  */
-/// FIXME: Should there be an IntegerLiteral and FloatLiteral instead?
-class NumberLiteral : Expr
-{
-    override bool isConstantExpr() { return true; }
-
-    override NumberLiteral asNumberLiteral() { return this; }
-    override bool isNumberLiteral() { return true; }
-}
-
-/**
-  StringLiteral
-  */
-class StringLiteral : Expr
-{
-    override bool isConstantExpr() { return true; }
-
-    override StringLiteral asStringLiteral() { return this; }
-    override bool isStringLiteral() { return true; }
-}
-
-/**
-  ArrayLiteral
-  */
-class ArrayLiteral : Expr
-{
-    /// Return the arguments for the ArrayLiteral
-    Expr[] getArguments() { return arguments; }
-
-    /// Return a given argument for the ArrayLiteral
-    Expr getArgument(int index) { return arguments[index]; }
-
-    /// Get the count of arguments for the ArrayLiteral
-    int getArgumentCount() { return arguments.length; }
-
-    override bool isConstantExpr() 
-    {
-        /**
-          If all the arguments to the ArrayLiteral is an constant Expr, then
-          this ArrayLiteral can be considered an constant Expr aswell.
-          */
-        // FIXME: consider if it should save the result
-        foreach (arg; arguments)
-            if (!arg.isConstantExpr())
-                return false;
-        return true; 
-    }
-
-    override ArrayLiteral asArrayLiteral() { return this; }
-    override bool isArrayLiteral() { return true; }
-
-private:
-    Expr[] arguments;
-}
-
-/**
-  The Assign expression contains two expression, a left and a right side, 
-  left being a lvalue, right being a rvalue. 
-
-  If the right side ain't the same type as the left type, the right side will
-  try to be promoted through an implicit cast. If this failes, an error must
-  be given.
-  */
-class Assign : Expr
-{
-    override Assign asAssign() { return this; }
-    override bool isAssign() { return true; }
-
-private:
-    Expr left, right;
-}
-
-/**
-  Binary
-  */
-class Binary : Expr
-{
-    override Binary asBinary() { return this; }
-    override bool isBinary() { return true; }
-
-private:
-    Expr left, right;
-}
-
-/**
-  Negate
-  */
-class Negate : Expr
-{
-    override Negate asNegate() { return this; }
-    override bool isNegate() { return true; }
-
-private:
-    Expr expr;
-}
-
-/**
-  Deref
-  */
-class Deref : Expr
-{
-    override Deref asDeref() { return this; }
-    override bool isDeref() { return true; }
-}
-
-/**
-  AddressOf
-  */
-class AddressOf : Expr
-{
-    override AddressOf asAddressOf() { return this; }
-    override bool isAddressOf() { return true; }
-}
-
-/**
-  Index
-  */
-class Index : Expr
-{
-    override Index asIndex() { return this; }
-    override bool isIndex() { return true; }
-}
-
-/**
-  Identifier
-  */
-class Identifier : Expr
-{
-    override Identifier asIdentifier() { return this; }
-    override bool isIdentifier() { return true; }
-}
-
-/**
-  Member
-  */
-class Member : Expr
-{
-    override Member asMember() { return this; }
-    override bool isMember() { return true; }
-}
-

--- a/ast/Stmt.d	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,127 +0,0 @@
-module ast.Stmt;
-
-/**
-  The base class for all Statements.
-  */
-class Stmt
-{
-    bool isCompoundStmt() { return false; }
-    CompoundStmt asCompoundStmt() { return null; }
-
-    bool isDeclStmt() { return false; }
-    DeclStmt asDeclStmt() { return null; }
-
-    bool isExpStmt() { return false; }
-    ExpStmt asExpStmt() { return null; }
-
-    bool isReturnStmt() { return false; }
-    ReturnStmt asReturnStmt() { return null; }
-
-    bool isIfStmt() { return false; }
-    IfStmt asIfStmt() { return null; }
-
-    bool isWhileStmt() { return false; }
-    WhileStmt asWhileStmt() { return null; }
-
-    bool isForStmt() { return false; }
-    ForStmt asForStmt() { return null; }
-
-    bool isSwitchStmt() { return false; }
-    SwitchStmt asSwitchStmt() { return null; }
-
-    bool isForeachStmt() { return false; }
-    ForeachStmt asForeachStmt() { return null; }
-
-    bool isAssertStmt() { return false; }
-    AssertStmt asAssertStmt() { return null; }
-}
-
-/**
-  CompoundStmt
-  */
-class CompoundStmt : Stmt
-{
-    override bool isCompoundStmt() { return true; }
-    override CompoundStmt asCompoundStmt() { return this; }
-}
-
-/**
-  DeclStmt
-  */
-class DeclStmt : Stmt
-{
-    override bool isDeclStmt() { return true; }
-    override DeclStmt asDeclStmt() { return this; }
-}
-
-/**
-  ExpStmt
-  */
-class ExpStmt : Stmt
-{
-    override bool isExpStmt() { return true; }
-    override ExpStmt asExpStmt() { return this; }
-}
-
-/**
-  ReturnStmt
-  */
-class ReturnStmt : Stmt
-{
-    override bool isReturnStmt() { return true; }
-    override ReturnStmt asReturnStmt() { return this; }
-}
-
-/**
-  IfStmt
-  */
-class IfStmt : Stmt
-{
-    override bool isIfStmt() { return true; }
-    override IfStmt asIfStmt() { return this; }
-}
-
-/**
-  WhileStmt
-  */
-class WhileStmt : Stmt
-{
-    override bool isWhileStmt() { return true; }
-    override WhileStmt asWhileStmt() { return this; }
-}
-
-/**
-  ForStmt
-  */
-class ForStmt : Stmt
-{
-    override bool isForStmt() { return true; }
-    override ForStmt asForStmt() { return this; }
-}
-
-/**
-  SwitchStmt
-  */
-class SwitchStmt : Stmt
-{
-    override bool isSwitchStmt() { return true; }
-    override SwitchStmt asSwitchStmt() { return this; }
-}
-
-/**
-  ForeachStmt
-  */
-class ForeachStmt : Stmt
-{
-    override bool isForeachStmt() { return true; }
-    override ForeachStmt asForeachStmt() { return this; }
-}
-
-/**
-  AssertStmt
-  */
-class AssertStmt : Stmt
-{
-    override bool isAssertStmt() { return true; }
-    override AssertStmt asAssertStmt() { return this; }
-}

--- a/doc/candydoc/CANDYDOC.txt	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,56 +0,0 @@
-
-CanDyDOC is fileset for creating advanced documentation of programs written
-in D programming language. CanDyDOC adds some eye-candy and advanced navigation
-features to .html documents that are generated by D compiler and known as DDOC.
-Produced result is AJAX web-application that is compatible with all mainstream
-web browsers.
-
-This is a fork of the original candydoc, distributed with DSSS. For more
-information on DSSS and DSSS' fork of candydoc, see
-http://www.dsource.org/projects/dsss/
-
-CanDyDOC includes following files:
-    - candy.ddoc
-        File with DDOC macro definitions. You haven't to touch it.
-
-    - modules.ddoc
-        You should enumerate all modules that would be avaible for navigation
-        here.
-
-    - style.css
-        Cascading style sheet file that defines look of produced documentation.
-        You can leave this file without changes or adjust fonts, colors, etc
-        here. See it for documentation.
-
-    - ie56hack.css
-        CSS file to force Internet Explorer 5/6 browser show documentation
-        as it looks like in standard-compliant browsers.
-
-    - tree.js
-        JavaScript implementing tree control that looks like native one.
-
-    - util.js
-        Common cross-browser routines.
-
-    - explorer.js
-        Heart of every documentation's page. Controls generation, behaviour and
-        navigation of a page.
-
-    - numerous of image files in 'img' folder.
-
-How to use:
-    1) Put 'candydoc' directory in place where documentation will be.
-    2) Modify modules.ddoc file: enumerate all modules that should be avaible
-       for navigation.
-    3) Modify style.css file if you want to change style of documentation. Or
-       leave it unmodified to apply defaul theme.
-    4) Run documentation compilation with candy.ddoc and modules.ddoc specified
-       on command line.
-    5) Enjoy a result :)
-
-Known bugs:
-    - Explorer window doesn't work on Safari browser.
-    - Scroll bar positions are not adjusted after explorer's tab change in Opera
-      browser. So it is posible to see nothing on some tab: solution is to
-      return to a previous tab, scroll it to top and then return back.
-    - Overlapping of some elements when too few horizontal place avaible.

--- a/doc/candydoc/candy.ddoc	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,51 +0,0 @@
-DDOC =  
-<html><head>
-<meta http-equiv="content-type" content="text/html; charset=utf-8">
-<meta content="text/javascript" http-equiv="content-script-type">
-<title>$(TITLE)</title>
-<link rel="stylesheet" type="text/css" href="candydoc/style.css">
-<!--[if lt IE 7]><link rel="stylesheet" type="text/css" href="candydoc/ie56hack.css"><![endif]-->
-<script language="JavaScript" src="candydoc/util.js" type="text/javascript"></script>
-<script language="JavaScript" src="candydoc/tree.js" type="text/javascript"></script>
-<script language="JavaScript" src="candydoc/explorer.js" type="text/javascript"></script>
-</head><body>
-<div id="tabarea"></div><div id="explorerclient"></div>
-<div id="content"><script>explorer.initialize("$(TITLE)");</script>
-	<table class="content">
-		<tr><td id="docbody"><h1>$(TITLE)</h1>$(BODY)</td></tr>
-		<tr><td id="docfooter">
-			Page was generated with
-			<img src="candydoc/img/candydoc.gif" style="vertical-align:middle; position:relative; top:-1px">
-			on $(DATETIME)
-		</td></tr>
-	</table>
-</div>
-$(ADD_MODULES)
-</body></html>
-
-
-DDOC_DECL =
-<script>explorer.outline.writeEnabled = true;</script>
-$(DT <span class="decl">$0</span>)
-<script>explorer.outline.writeEnabled = false;</script>
-
-
-DDOC_PSYMBOL =
-<span class="currsymbol">$0</span>
-<script>explorer.outline.addDecl('$0');</script>
-
-
-DDOC_MEMBERS =
-<script>explorer.outline.incSymbolLevel();</script>
-$(DL $0)
-<script>explorer.outline.decSymbolLevel();</script>
-
-
-DDOC_PARAM_ID =
-<td nowrap valign="top" style="padding-right: 8px">$0</td>
-
-               
-DDOC_PARAM =<span class="funcparam">$0</span>
-ADD_MODULES =<script>$(MODULES)</script>
-MODULE =explorer.packageExplorer.addModule("$0");
-MODULE_FULL =explorer.packageExplorer.addModuleFull("$0");

--- a/doc/candydoc/explorer.js	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,319 +0,0 @@
-/* This file is a part of CanDyDOC fileset.
-   File is written by Victor Nakoryakov and placed into the public domain.
-
-   This file is javascript with classes that represents explorer window.
-   And things related to navigation. */
-   
-var explorer = new Explorer();
-
-///////////////////////////////////////////////////////////////////////////////
-// Current symbol marker class constructor
-///////////////////////////////////////////////////////////////////////////////
-function Marker()
-{
-    this.top    = document.createElement("div");
-    this.middle = document.createElement("div");
-    this.bottom = document.createElement("div");
-    this.container = document.createElement("div");
-    
-    this.setTo = function(term)
-    {
-        // find definition related to `term`
-        var def = term.nextSibling;
-        while (def && def.nodeName != "DD")
-            def = def.nextSibling;
-            
-        var defHeight = 0;
-        var childrenHeight = 0; // children of current declaration
-        if (def)
-        {
-            defHeight = def.offsetHeight;
-            var child = def.firstChild;
-            
-            // traverse until DL tag, until children definition
-            while (child && child.nodeName != "DL")
-                child = child.nextSibling;
-                
-            if (child)
-                childrenHeight = child.offsetHeight;
-        }
-        
-        this.top.style.height = term.offsetHeight;
-        this.middle.style.height = defHeight - childrenHeight;
-        this.bottom.style.height = childrenHeight;
-        
-        if (childrenHeight == 0)
-            this.bottom.style.display = "none";
-        else
-            this.bottom.style.display = "";
-        
-        this.container.style.left = getLeft(term) - 8;
-        this.container.style.top = getTop(term);
-        this.container.style.display = "";
-    }
-        
-    ///////////////////////////////////////////////////////////////////////////
-    this.container.style.position = "absolute";
-    this.container.style.display = "none";
-    
-    this.top.className = "markertop";
-    this.middle.className = "markermiddle";
-    this.bottom.className = "markerbottom";
-    
-    this.container.appendChild(this.top);
-    this.container.appendChild(this.middle);
-    this.container.appendChild(this.bottom);
-    
-    //document.body.appendChild( this.container );
-    
-    // Workaround bug in IE 5/6. We can not append anything to document body until
-    // full page load.
-    window.marker = this;
-    if (window.addEventListener)
-        window.addEventListener("load", new Function("document.body.appendChild( window.marker.container );"), false);
-    else if (window.attachEvent)
-        window.attachEvent("onload", new Function("document.body.appendChild( window.marker.container );"));
-}
-
-///////////////////////////////////////////////////////////////////////////////
-// Outline class constructor
-///////////////////////////////////////////////////////////////////////////////
-function Outline()
-{
-    this.tree           = new TreeView();
-    this.mountPoint     = null;    
-    this.writeEnabled   = false;
-    this.marker         = new Marker();        
-    this.classRegExp    = new RegExp;
-    this.structRegExp   = new RegExp;
-    this.enumRegExp     = new RegExp;
-    this.templateRegExp = new RegExp;
-    this.aliasRegExp    = new RegExp;
-    this.funcRegExp     = new RegExp;
-    
-    this.incSymbolLevel = function()
-    {
-        if (this.mountPoint == null)
-            this.mountPoint = this.tree.children[ 0 ];
-        else
-            this.mountPoint = this.mountPoint.lastChild();
-    }
-
-    this.decSymbolLevel = function()
-    {
-        // place icons near items according to extracted below type
-        for (var i = 0; i < this.mountPoint.children.length; ++i)
-        {
-            child = this.mountPoint.children[i];
-            var term = child.termRef;
-            
-            // find first span node
-            var n = term.firstChild;
-            while (n && n.nodeName != "SPAN")
-                n = n.nextSibling;
-            
-            if (!n) // shouldn't happen
-                continue;
-            
-            var iconSrc;
-            if (n.firstChild.nodeName == "#text")
-            {
-                var text = n.firstChild.data; // text before declaration
-                
-                if ( this.classRegExp.test(text) )
-                    iconSrc = "candydoc/img/outline/class.gif";
-                else if ( this.structRegExp.test(text) )
-                    iconSrc = "candydoc/img/outline/struct.gif";
-                else if ( this.enumRegExp.test(text) )
-                    iconSrc = "candydoc/img/outline/enum.gif";
-                else if ( this.templateRegExp.test(text) )
-                    iconSrc = "candydoc/img/outline/template.gif";
-                else if ( this.aliasRegExp.test(text) )
-                    iconSrc = "candydoc/img/outline/alias.gif";
-                else // function or variable? check whether '(' ')' exists on the right
-                {
-                    var np = n.firstChild;
-                    while (np && np.nodeName != "SCRIPT") // find our script "onDecl"
-                        np = np.nextSibling;
-                        
-                    if (np && np.nextSibling && np.nextSibling.nodeName == "#text" &&
-                        this.funcRegExp.test(np.nextSibling.data))
-                    {
-                        iconSrc = "candydoc/img/outline/func.gif";
-                    }
-                    else
-                        iconSrc = "candydoc/img/outline/var.gif";
-                }
-            }
-            else // enum member ?
-                iconSrc = "candydoc/img/outline/var.gif";
-                    
-            child.icon.src = iconSrc;
-            child.icon.width = 16;
-            child.icon.height = 16;
-        }
-        
-        this.mountPoint = this.mountPoint.parentNode;
-    }
-
-    this.addDecl = function(decl)
-    {
-        function getLastLeaf(elem)
-        {
-            if (elem.childNodes.length > 0)
-                return getLastLeaf(elem.lastChild);
-            else
-                return elem;
-        }
-
-        function getCurrentTerm()
-        {
-            var ret = getLastLeaf( document.getElementById("content") );
-            while (ret && ret.nodeName != "DT")
-                ret = ret.parentNode;
-            
-            return ret;
-        }
-        
-        if (this.writeEnabled)
-        {
-            var node = this.mountPoint.createChild(decl);
-            node.termRef = getCurrentTerm();
-            node.setOnclick( new Function("explorer.outline.mark(this.termRef);") );
-        }
-    }
-
-    this.mark = function(term)
-    {
-        this.marker.setTo(term);
-        window.scrollTo(0, getTop(term) - getWindowHeight() / 6);    
-    }
-        
-    
-    this.classRegExp.compile("(.*\b)?class(\b.*)?");
-    this.structRegExp.compile("(.*\b)?struct(\b.*)?");
-    this.enumRegExp.compile("(.*\b)?enum(\b.*)?");
-    this.templateRegExp.compile("(.*\b)?template(\b.*)?");
-    this.aliasRegExp.compile("(.*\b)?alias(\b.*)?");
-    this.funcRegExp.compile(/.*\(.*/);    
-}
-
-
-
-
-///////////////////////////////////////////////////////////////////////////////
-// Package explorer class constructor
-///////////////////////////////////////////////////////////////////////////////
-function PackageExplorer()
-{
-    this.tree = new TreeView(true);    
-    
-    this.addModule2 = function(mod, full)
-    {
-        var moduleIco = "candydoc/img/outline/module.gif";
-        var packageIco = "candydoc/img/outline/package.gif";
-
-        var path = mod.split("\.");
-        var node = this.tree.branch(path[0]);
-        if ( !node )
-            node = this.tree.createBranch(path[0], (path.length == 1) ? moduleIco : packageIco);
-        
-        for (var i = 1; i < path.length; ++i)
-        {
-            var prev = node;
-            node = node.child(path[i]);
-            if (!node)
-                node = prev.createChild(path[i], (path.length == i + 1) ? moduleIco : packageIco);
-                
-            if (path.length == i + 1) {
-                if (full)
-                    node.setRef(mod + ".html");
-                else
-                    node.setRef(path[i] + ".html");
-            }
-        }
-    }
-    
-    this.addModuleFull = function(mod)
-    {
-        this.addModule2(mod, true);
-    }
-    
-    this.addModule = function(mod)
-    {
-        this.addModule2(mod, false);
-    }
-}
-
-
-
-///////////////////////////////////////////////////////////////////////////////
-// Explorer class constructor
-///////////////////////////////////////////////////////////////////////////////
-function Explorer()
-{
-    this.outline         = new Outline();
-    this.packageExplorer = new PackageExplorer();
-    this.tabs            = new Array();
-    this.tabCount        = 0;
-    
-    this.initialize = function(moduleName)
-    {
-        this.tabArea = document.getElementById("tabarea");
-        this.clientArea = document.getElementById("explorerclient");
-        
-        // prevent text selection
-        this.tabArea.onmousedown = new Function("return false;");
-        this.tabArea.onclick = new Function("return true;");
-        this.tabArea.onselectstart = new Function("return false;");
-        this.clientArea.onmousedown = new Function("return false;");
-        this.clientArea.onclick = new Function("return true;");
-        this.clientArea.onselectstart = new Function("return false;");
-        
-        this.outline.tree.createBranch( moduleName, "candydoc/img/outline/module.gif" );
-        
-        // create tabs
-        this.createTab("Outline", this.outline.tree.domEntry);
-        this.createTab("Package", this.packageExplorer.tree.domEntry);
-    }
-    
-    this.createTab = function(name, domEntry)
-    {
-        var tab = new Object();
-        this.tabs[name] = tab;
-        this.tabCount++;
-        
-        tab.domEntry = domEntry;
-        tab.labelSpan = document.createElement("span");
-        
-        if (this.tabCount > 1)
-        {
-            tab.labelSpan.className = "inactivetab";
-            tab.domEntry.style.display = "none";
-        }
-        else
-        {
-            tab.labelSpan.className = "activetab";
-            tab.domEntry.style.display = "";
-        }
-        
-        tab.labelSpan.appendChild( document.createTextNode(name) );
-        tab.labelSpan.owner = this;
-        tab.labelSpan.onclick = new Function("this.owner.setSelection('" + name + "');");
-        
-        this.tabArea.appendChild( tab.labelSpan );
-        this.clientArea.appendChild( domEntry );
-    }
-    
-    this.setSelection = function(tabName)
-    {
-        for (name in this.tabs)
-        {
-            this.tabs[name].labelSpan.className = "inactivetab";
-            this.tabs[name].domEntry.style.display = "none";
-        }
-        
-        this.tabs[tabName].labelSpan.className = "activetab";
-        this.tabs[tabName].domEntry.style.display = "";
-    }
-}

--- a/doc/candydoc/ie56hack.css	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,21 +0,0 @@
-/* This file is a part of CanDyDOC fileset.
-   File is written by Victor Nakoryakov and placed into the public domain.
-
-   This file is CSS to work around IE6 and earlier bugs. It's included just
-   in these browsers. */
-
-
-/* Some magic to emulate unsupported "position: fixed" style. */
-#tabarea
-{
-	_position: absolute;
-	_top: expression(eval(document.body.scrollTop+8));
-}
-
-/* ditto */
-#explorerclient 
-{
-	_position: absolute;
-	_top: expression(eval(document.body.scrollTop+24));
-	_height: expression(eval(document.body.clientHeight-48));
-}

Binary file doc/candydoc/img/bg.gif has changed

Binary file doc/candydoc/img/candydoc.gif has changed

Binary file doc/candydoc/img/outline/alias.gif has changed

Binary file doc/candydoc/img/outline/bg.gif has changed

Binary file doc/candydoc/img/outline/class.gif has changed

Binary file doc/candydoc/img/outline/enum.gif has changed

Binary file doc/candydoc/img/outline/func.gif has changed

Binary file doc/candydoc/img/outline/module.gif has changed

Binary file doc/candydoc/img/outline/package.gif has changed

Binary file doc/candydoc/img/outline/struct.gif has changed

Binary file doc/candydoc/img/outline/template.gif has changed

Binary file doc/candydoc/img/outline/var.gif has changed

Binary file doc/candydoc/img/package/bg.gif has changed

Binary file doc/candydoc/img/tree/shim.gif has changed

Binary file doc/candydoc/img/tree/tb.gif has changed

Binary file doc/candydoc/img/tree/tbr.gif has changed

Binary file doc/candydoc/img/tree/tbrm.gif has changed

Binary file doc/candydoc/img/tree/tbrp.gif has changed

Binary file doc/candydoc/img/tree/tr.gif has changed

Binary file doc/candydoc/img/tree/trm.gif has changed

Binary file doc/candydoc/img/tree/trp.gif has changed

--- a/doc/candydoc/modules.ddoc	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,3 +0,0 @@
-MODULES =
-	$(MODULE_FULL ast.Decl)
-	$(MODULE_FULL ast.Expr)

--- a/doc/candydoc/style.css	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,169 +0,0 @@
-/* This file is a part of CanDyDOC fileset.
-   File is written by Victor Nakoryakov and placed into the public domain.
-
-   This file is main CSS file of CanDyDOC. You may adjust some part of
-   parameters to control how result documentation would looks like. See
-   further documentation for details. */
-
-
-
-/* This controls how background would looks like and
-   sets some document-scope defaults. */
-body 
-{
-	/* These parameters control default font. */
-	font-family: Verdana, Arial, Helvetica, sans-serif;
-	font-size: 10pt;
-	color: #666666;
-	
-	/* These control look of background. Note that you have to use
-       fixed background to keep documentation good-looking in
-       IE6 and earlier. Otherwise whole *explorer* will jerk while
-       scrolling. If you do not want to use background at all use
-       some invalid url, e.g. url(foo). */
-	background-color: #e6fcea;
-	background: url(img/bg.gif) fixed;
-	
-	/* Don't touch. Necessary for IE6 and earlier. */
-	height: 100%;	
-}
-
-
-
-/* Style applied to all tables. Actualy there are two: one table is
-   that contains contant and footer with CanDyDOC logo, and others
-   are that contains functions' parameters description. */
-table 
-{
-	font-family: Verdana, Arial, Helvetica, sans-serif;
-	font-size: 10pt;
-	color: #666666;
-	text-align: justify;
-}
-
-
-/* Style used for all hyperlinks. */
-a:link {  color: #009900; text-decoration: none }
-a:visited {  color: #009999; text-decoration: none }
-a:hover {  color: #0033cc; text-decoration: none }
-a:active {  color: #0033cc; text-decoration: none }
-
-/*
-table.matrix 
-{
-	border-left: double 3px #666666;
-	border-right: double 3px #666666;
-	margin-left: 3em;
-}
-*/
-
-/* Style appled to declarations. E.g. 'void foo(int a, float b);' */
-span.decl { font-size: 10pt; font-weight: bold; color: #000000; text-align: left }
-/* Style appled to current declaration's symbol. E.g. 'foo' in 'void foo(int a, float b);' */
-span.currsymbol { font-size: 12pt; color: #009900 }
-/* Style appled to function's parameters. E.g. 'a' and 'b' in 'void foo(int a, float b);' */
-span.funcparam  { font-style: italic; font-weight: normal; color: #331200 }
-
-/* Style for div that actualy contains documenation. */
-#content
-{
-	padding-right: 8px;
-	position: absolute;
-	left: 245px;
-	top: 8px;
-	text-align: justify;
-}
-
-/* Style for table that is inside div considered above. Contains documentaton
-   itself and footer with CanDyDOC logo. */
-table.content
-{
-	margin-bottom: 8px;
-	border-spacing: 0px;
-	border-collapse: collapse;
-	background-color: #ffffff;
-}
-
-/* Style for cell of above considered table that contains documentation itself. */
-#docbody
-{
-	padding: 8px 20px 8px 20px;
-	border: solid 1px #009900;
-}
-
-/* Style for cell that contains CanDyDOC logo. */
-#docfooter
-{
-	height: 16px;
-	background-color: #ddeedd;
-	padding: 0px 8px 0px 8px;
-	border: solid 1px #009900;
-}
-
-/* Style applied to currently active tab of explorer window. */
-span.activetab
-{
-	background-color: #0033cc;
-	border-top: solid 2px #009900;
-	color: #ffffff;
-	font-weight: bold;
-	padding-left: 4px;
-	padding-right: 4px;
-	padding-top: 1px;
-	margin-right: 1px;
-}
-
-/* Style applied to currently inactive tab of explorer window. */
-span.inactivetab
-{
-	background-color: #000066;
-	color: #cccccc;
-	font-weight: normal;
-	padding-left: 4px;
-	padding-right: 4px;
-	padding-top: 0px;
-	margin-right: 1px;
-}
-
-/* Style applied to div that contains tabs of explorer. Note that if
-   you want to change it's position you have to change position of
-   #explorerclient, #content and corresponding values in ie56hack.css */
-#tabarea
-{
-	position: fixed;
-	top: 8px;
-	width: 205px;
-	height: 16px;
-	cursor: default;
-}
-
-
-/* Style applied to div that contains tree in explorer. Note that if
-   you want to change it's position you have to change position of
-   #tabarea, #content and corresponding values in ie56hack.css */
-#explorerclient 
-{
-	position: fixed;
-	top: 24px;
-	bottom: 8px;
-	width: 205px;
-	overflow: auto;
-	background-color: #fcfffc;
-	border: solid 2px #0033cc;
-	padding: 4px;
-	cursor: default;
-	color: Black;
-}
-
-/* Following 3 styles control appearance of marker that appears
-   if you click some entity in outline window. */
-div.markertop	{ border-left: solid 2px #0033cc;}
-div.markermiddle{ border-left: dotted 2px #0033cc;}
-div.markerbottom{ border-left: dotted 2px #66cc66;}
-
-/* Style applied to preformated text used to show examples. */
-pre.d_code
-{
-	border: dotted 1px #9c9;
-	background-color: #eeffee;
-}
\ No newline at end of file

--- a/doc/candydoc/tree.js	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,374 +0,0 @@
-/* This file is a part of CanDyDOC fileset.
-   File is written by Victor Nakoryakov and placed into the public domain.
-
-   This file is javascript with classes that represents native style tree control. */
-   
-var pmNone = 0;
-var pmPlus = 1;
-var pmMinus = 2;
-
-var hlNone = 0;
-var hlGrey = 1;
-var hlSelected = 2;
-
-function TreeView(hrefMode)
-{
-    this.domEntry = document.createElement("div");
-    this.children = new Array();
-    this.selection = null;
-    this.hrefMode = hrefMode;
-    
-    this.createBranch = function(text, iconSrc)
-    {
-        var root = new TreeNode(text, iconSrc, this.hrefMode);
-        root.owner = this;
-        this.children[ this.children.length ] = root;
-        this.domEntry.appendChild( root.domEntry );
-        return root;
-    }
-    
-    this.branch = function(text)
-    {
-        var ret = null;
-        for (var i = 0; i < this.children.length; ++i)
-            if (this.children[i].textElement.data == text)
-            {
-                ret = this.children[i];
-                break;
-            }
-            
-        return ret;
-    }
-    
-    this.domEntry.style.fontSize = "10px";
-    this.domEntry.style.cursor = "default";
-    this.domEntry.style.whiteSpace = "nowrap";
-}
-
-var idCounter = 0;
-function TreeNode(text, iconSrc, hrefMode)
-{
-    this.id             = idCounter++;
-    this.parentNode     = null;
-    this.children       = new Array();
-    this.domEntry       = document.createElement("div");
-    this.icon           = document.createElement("img");
-    this.textElement    = document.createTextNode(text);
-    this.textSpan       = document.createElement("span");
-    this.lineDiv        = document.createElement("div");
-    this.hierarchyImgs  = new Array();
-    this.onclick        = null;
-    
-    function createIcon()
-    {
-        var img = document.createElement("img");
-        img.style.verticalAlign = "middle";
-        img.style.position = "relative";
-        img.style.top = "-1px";
-        img.width = 16;
-        img.height = 16;
-        return img;
-    }
-    
-    function createHierarchyImage()
-    {
-        var img = createIcon();
-        img.pointsTop = false;
-        img.pointsBottom = false;
-        img.pointsRight = false;
-        img.pmState = pmNone;
-        return img;
-    }
-    
-    function genHierarchyImageSrc(hierarchyImg)
-    {
-        var name = "";
-        if (hierarchyImg.pointsTop)
-            name += "t";
-            
-        if (hierarchyImg.pointsBottom)
-            name += "b";
-            
-        if (hierarchyImg.pointsRight)
-            name += "r";
-            
-        if (hierarchyImg.pmState == pmPlus)
-            name += "p";
-        else if (hierarchyImg.pmState == pmMinus)
-            name += "m";
-        
-        if (name == "")
-            name = "shim";
-        
-        return "candydoc/img/tree/" + name + ".gif";
-    }
-    
-    function setSrc(icon, src)
-    {
-        icon.src = src;
-        // After src change width and height are reseted in IE.
-        // Bug workaround:
-        icon.width = 16;
-        icon.height = 16;
-    }
-    
-    this.createChild = function(text, iconSrc)
-    {
-        var child = new TreeNode(text, iconSrc, this.owner.hrefMode);
-        this.children[ this.children.length ] = child;
-        this.domEntry.appendChild( child.domEntry );
-        child.parentNode = this;
-        child.owner = this.owner;
-        
-        // insert hierarchy images according to deepness level
-        // of created child.
-        
-        if (this.children.length > 1)
-        {
-            // there were already added child before. So copy `level-1`
-            // hierarchy images from it.
-            
-            var prevAddedChild = this.children[ this.children.length - 2 ];
-            
-            for (var i = 0; i < prevAddedChild.hierarchyImgs.length - 1; ++i)
-            {
-                var prevAddedChildImg = prevAddedChild.hierarchyImgs[i];
-                var img = createHierarchyImage();
-                setSrc(img, prevAddedChildImg.src);
-                img.pointsTop = prevAddedChildImg.pointsTop;
-                img.pointsBottom = prevAddedChildImg.pointsBottom;
-                img.pointsRight = prevAddedChildImg.pointsRight;
-                img.pmState = prevAddedChildImg.pmState;
-                
-                child.hierarchyImgs[ child.hierarchyImgs.length ] = img;
-                child.lineDiv.insertBefore(img, child.icon);
-            }
-            
-            // change last hierarchy image of prevAddedChild from |_ to |-
-            var lastHierarchyImg = prevAddedChild.hierarchyImgs[ prevAddedChild.hierarchyImgs.length - 1 ];
-            lastHierarchyImg.pointsBottom = true;
-            setSrc(lastHierarchyImg, genHierarchyImageSrc(lastHierarchyImg));
-                        
-            // change hierarchy images of prevAddedChild's children on it's last
-            // level to |
-            prevAddedChild.addHierarchyTBLine(prevAddedChild.hierarchyImgs.length - 1);
-        }
-        else
-        {
-            // this is a first child. So copy `level-2`
-            // hierarchy images from parent, i.e. this.
-            
-            for (var i = 0; i < this.hierarchyImgs.length - 1; ++i)
-            {
-                var parentImg = this.hierarchyImgs[i];
-                var img = createHierarchyImage();
-                setSrc(img, parentImg.src);
-                img.pointsTop = parentImg.pointsTop;
-                img.pointsBottom = parentImg.pointsBottom;
-                img.pointsRight = parentImg.pointsRight;
-                img.pmState = parentImg.pmState;
-                
-                child.hierarchyImgs[ child.hierarchyImgs.length ] = img;
-                child.lineDiv.insertBefore(img, child.icon);
-            }
-            
-            if (this.hierarchyImgs.length > 0) // we are not root
-            {
-                // change last hierarchy image of parent (i.e. this): add minus to it
-                var lastHierarchyImg = this.hierarchyImgs[ this.hierarchyImgs.length - 1];
-                lastHierarchyImg.pmState = pmMinus;
-                setSrc(lastHierarchyImg, genHierarchyImageSrc(lastHierarchyImg));
-                lastHierarchyImg.owner = this;
-                lastHierarchyImg.onclick = new Function("e", "this.owner.processPMClick(e);");
-                
-                // make decision on image on `level-1`. It depends on parent's (ie this)
-                // image on same level.
-                var parentL1HierarchyImg = lastHierarchyImg;
-                var l1HierarchyImg = createHierarchyImage();
-                if (parentL1HierarchyImg.pointsBottom)
-                {
-                    l1HierarchyImg.pointsTop = true;
-                    l1HierarchyImg.pointsBottom = true;
-                }
-                setSrc(l1HierarchyImg, genHierarchyImageSrc(l1HierarchyImg));
-                child.hierarchyImgs[ child.hierarchyImgs.length ] = l1HierarchyImg;
-                child.lineDiv.insertBefore(l1HierarchyImg, child.icon);
-            }
-        }
-        
-        // in any case on last level our child will have icon |_
-        var img = createHierarchyImage();
-        img.pointsTop = true;
-        img.pointsRight = true;
-        setSrc(img, genHierarchyImageSrc(img));
-        
-        child.hierarchyImgs[ child.hierarchyImgs.length ] = img;
-        child.lineDiv.insertBefore(img, child.icon);
-        
-        return child;
-    }
-    
-    this.lastChild = function()
-    {
-        return this.children[ this.children.length - 1 ];
-    }
-    
-    this.child = function(text)
-    {
-        var ret = null;
-        for (var i = 0; i < this.children.length; ++i)
-            if (this.children[i].textElement.data == text)
-            {
-                ret = this.children[i];
-                break;
-            }
-            
-        return ret;
-    }
-    
-    this.addHierarchyTBLine = function(level)
-    {
-        for (var i = 0; i < this.children.length; ++i)
-        {
-            var img = this.children[i].hierarchyImgs[level];
-            img.pointsTop = true;
-            img.pointsBottom = true;
-            setSrc(img, genHierarchyImageSrc(img));
-            this.children[i].addHierarchyTBLine(level);
-        }
-    }
-    
-    this.expand = function()
-    {
-        var img = this.hierarchyImgs[ this.hierarchyImgs.length - 1 ];
-        
-        if (img.pmState == pmPlus)
-        {
-            img.pmState = pmMinus;
-            setSrc(img, genHierarchyImageSrc(img));
-            
-            for (var i = 0; i < this.children.length; ++i)
-                this.children[i].domEntry.style.display = "";
-        }
-    }
-    
-    this.collapse = function()
-    {
-        var img = this.hierarchyImgs[ this.hierarchyImgs.length - 1 ];
-        
-        if (img.pmState == pmMinus)
-        {
-            img.pmState = pmPlus;
-            setSrc(img, genHierarchyImageSrc(img));
-            
-            for (var i = 0; i < this.children.length; ++i)
-                this.children[i].domEntry.style.display = "none";
-        }
-    }
-    
-    this.toggle = function()
-    {
-        var img = this.hierarchyImgs[ this.hierarchyImgs.length - 1 ];
-        if (img.pmState == pmMinus)
-            this.collapse();
-        else
-            this.expand();
-    }
-    
-    this.select = function()
-    {
-        if (this.owner.selection != this)
-        {
-            if (this.owner.selection)
-                this.owner.selection.setHighlight(hlNone);
-                
-            this.owner.selection = this;
-            this.setHighlight(hlSelected);
-        }
-    }
-    
-    this.setHighlight = function(mode)
-    {
-        if (mode == hlNone)
-        {
-            this.textSpan.style.backgroundColor = "";
-            this.textSpan.style.color = "";
-            this.textSpan.style.border = "";
-        }
-        else if (mode == hlGrey)
-        {
-            this.textSpan.style.backgroundColor = "#aaaaaa";
-            this.textSpan.style.color = "";
-            this.textSpan.style.border = "";
-        }
-        else if (mode == hlSelected)
-        {
-            this.textSpan.style.backgroundColor = "3399cc";
-            this.textSpan.style.color = "white";
-            this.textSpan.style.border = "dotted 1px red";
-        }
-    }
-    
-    this.setOnclick = function(proc)
-    {
-        this.onclick = proc;
-    }
-    
-    this.setRef = function(url)
-    {
-        if (this.anchor)
-            this.anchor.href = url;
-    }
-    
-    this.processPMClick = function(e)
-    {
-        this.toggle();
-        
-        // prevent this line selection, stop bubbling
-        if (e)
-            e.stopPropagation(); // Mozilla way
-        if (window.event)
-            window.event.cancelBubble = true; // IE way
-    }
-    
-    this.processOnclick = function()
-    {
-        this.select();
-        if (this.onclick instanceof Function)
-            this.onclick();
-    }
-    
-    ///////////////////////////////////////////////////////////////////////////
-    if (iconSrc)
-        this.icon.src = iconSrc;
-    else
-    {
-        this.icon.width = 0;
-        this.icon.height = 0;
-    }
-    
-    this.icon.style.verticalAlign = "middle";
-    this.icon.style.position = "relative";
-    this.icon.style.top = "-1px";
-    this.icon.style.paddingRight = "2px";
-    
-    if (!hrefMode)
-    {
-        this.textSpan.appendChild( this.textElement );
-    }
-    else
-    {
-        this.anchor = document.createElement("a");
-        this.anchor.appendChild( this.textElement );
-        this.textSpan.appendChild( this.anchor );
-    }
-    
-    this.lineDiv.appendChild( this.icon );
-    this.lineDiv.appendChild( this.textSpan );
-    this.domEntry.appendChild( this.lineDiv );
-    
-    this.lineDiv.owner = this;
-    
-    if (!hrefMode)
-        this.lineDiv.onclick = new Function("this.owner.processOnclick();");
-}

--- a/doc/candydoc/util.js	Mon Aug 11 21:56:21 2008 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,41 +0,0 @@
-/* This file is a part of CanDyDOC fileset.
-   File is written by Victor Nakoryakov and placed into the public domain.
-
-   This file is javascript with cross-browser utility functions. */
-
-function getLeft(elem)
-{
-    var ret = 0;
-	while (elem.offsetParent)
-	{
-		ret += elem.offsetLeft;
-		elem = elem.offsetParent;
-	}
-
-	return ret;
-}
-
-function getTop(elem)
-{
-    var ret = 0;
-	while (elem.offsetParent)
-	{
-		ret += elem.offsetTop;
-		elem = elem.offsetParent;
-	}
-
-	return ret;
-}
-
-function getWindowHeight()
-{
-    var ret = 0;
-    if (typeof(window.innerHeight) == "number")
-        ret = window.innerHeight;
-    else if (document.documentElement && document.documentElement.clientHeight)
-        ret = document.documentElement.clientHeight;
-    else if (document.body && document.body.clientHeight)
-        ret = document.body.clientHeight;
-    
-    return ret;
-}

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/docs/candydoc/CANDYDOC.txt	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,56 @@
+
+CanDyDOC is fileset for creating advanced documentation of programs written
+in D programming language. CanDyDOC adds some eye-candy and advanced navigation
+features to .html documents that are generated by D compiler and known as DDOC.
+Produced result is AJAX web-application that is compatible with all mainstream
+web browsers.
+
+This is a fork of the original candydoc, distributed with DSSS. For more
+information on DSSS and DSSS' fork of candydoc, see
+http://www.dsource.org/projects/dsss/
+
+CanDyDOC includes following files:
+    - candy.ddoc
+        File with DDOC macro definitions. You haven't to touch it.
+
+    - modules.ddoc
+        You should enumerate all modules that would be avaible for navigation
+        here.
+
+    - style.css
+        Cascading style sheet file that defines look of produced documentation.
+        You can leave this file without changes or adjust fonts, colors, etc
+        here. See it for documentation.
+
+    - ie56hack.css
+        CSS file to force Internet Explorer 5/6 browser show documentation
+        as it looks like in standard-compliant browsers.
+
+    - tree.js
+        JavaScript implementing tree control that looks like native one.
+
+    - util.js
+        Common cross-browser routines.
+
+    - explorer.js
+        Heart of every documentation's page. Controls generation, behaviour and
+        navigation of a page.
+
+    - numerous of image files in 'img' folder.
+
+How to use:
+    1) Put 'candydoc' directory in place where documentation will be.
+    2) Modify modules.ddoc file: enumerate all modules that should be avaible
+       for navigation.
+    3) Modify style.css file if you want to change style of documentation. Or
+       leave it unmodified to apply defaul theme.
+    4) Run documentation compilation with candy.ddoc and modules.ddoc specified
+       on command line.
+    5) Enjoy a result :)
+
+Known bugs:
+    - Explorer window doesn't work on Safari browser.
+    - Scroll bar positions are not adjusted after explorer's tab change in Opera
+      browser. So it is posible to see nothing on some tab: solution is to
+      return to a previous tab, scroll it to top and then return back.
+    - Overlapping of some elements when too few horizontal place avaible.

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/docs/candydoc/candy.ddoc	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,51 @@
+DDOC =  
+<html><head>
+<meta http-equiv="content-type" content="text/html; charset=utf-8">
+<meta content="text/javascript" http-equiv="content-script-type">
+<title>$(TITLE)</title>
+<link rel="stylesheet" type="text/css" href="candydoc/style.css">
+<!--[if lt IE 7]><link rel="stylesheet" type="text/css" href="candydoc/ie56hack.css"><![endif]-->
+<script language="JavaScript" src="candydoc/util.js" type="text/javascript"></script>
+<script language="JavaScript" src="candydoc/tree.js" type="text/javascript"></script>
+<script language="JavaScript" src="candydoc/explorer.js" type="text/javascript"></script>
+</head><body>
+<div id="tabarea"></div><div id="explorerclient"></div>
+<div id="content"><script>explorer.initialize("$(TITLE)");</script>
+	<table class="content">
+		<tr><td id="docbody"><h1>$(TITLE)</h1>$(BODY)</td></tr>
+		<tr><td id="docfooter">
+			Page was generated with
+			<img src="candydoc/img/candydoc.gif" style="vertical-align:middle; position:relative; top:-1px">
+			on $(DATETIME)
+		</td></tr>
+	</table>
+</div>
+$(ADD_MODULES)
+</body></html>
+
+
+DDOC_DECL =
+<script>explorer.outline.writeEnabled = true;</script>
+$(DT <span class="decl">$0</span>)
+<script>explorer.outline.writeEnabled = false;</script>
+
+
+DDOC_PSYMBOL =
+<span class="currsymbol">$0</span>
+<script>explorer.outline.addDecl('$0');</script>
+
+
+DDOC_MEMBERS =
+<script>explorer.outline.incSymbolLevel();</script>
+$(DL $0)
+<script>explorer.outline.decSymbolLevel();</script>
+
+
+DDOC_PARAM_ID =
+<td nowrap valign="top" style="padding-right: 8px">$0</td>
+
+               
+DDOC_PARAM =<span class="funcparam">$0</span>
+ADD_MODULES =<script>$(MODULES)</script>
+MODULE =explorer.packageExplorer.addModule("$0");
+MODULE_FULL =explorer.packageExplorer.addModuleFull("$0");

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/docs/candydoc/explorer.js	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,319 @@
+/* This file is a part of CanDyDOC fileset.
+   File is written by Victor Nakoryakov and placed into the public domain.
+
+   This file is javascript with classes that represents explorer window.
+   And things related to navigation. */
+   
+var explorer = new Explorer();
+
+///////////////////////////////////////////////////////////////////////////////
+// Current symbol marker class constructor
+///////////////////////////////////////////////////////////////////////////////
+function Marker()
+{
+    this.top    = document.createElement("div");
+    this.middle = document.createElement("div");
+    this.bottom = document.createElement("div");
+    this.container = document.createElement("div");
+    
+    this.setTo = function(term)
+    {
+        // find definition related to `term`
+        var def = term.nextSibling;
+        while (def && def.nodeName != "DD")
+            def = def.nextSibling;
+            
+        var defHeight = 0;
+        var childrenHeight = 0; // children of current declaration
+        if (def)
+        {
+            defHeight = def.offsetHeight;
+            var child = def.firstChild;
+            
+            // traverse until DL tag, until children definition
+            while (child && child.nodeName != "DL")
+                child = child.nextSibling;
+                
+            if (child)
+                childrenHeight = child.offsetHeight;
+        }
+        
+        this.top.style.height = term.offsetHeight;
+        this.middle.style.height = defHeight - childrenHeight;
+        this.bottom.style.height = childrenHeight;
+        
+        if (childrenHeight == 0)
+            this.bottom.style.display = "none";
+        else
+            this.bottom.style.display = "";
+        
+        this.container.style.left = getLeft(term) - 8;
+        this.container.style.top = getTop(term);
+        this.container.style.display = "";
+    }
+        
+    ///////////////////////////////////////////////////////////////////////////
+    this.container.style.position = "absolute";
+    this.container.style.display = "none";
+    
+    this.top.className = "markertop";
+    this.middle.className = "markermiddle";
+    this.bottom.className = "markerbottom";
+    
+    this.container.appendChild(this.top);
+    this.container.appendChild(this.middle);
+    this.container.appendChild(this.bottom);
+    
+    //document.body.appendChild( this.container );
+    
+    // Workaround bug in IE 5/6. We can not append anything to document body until
+    // full page load.
+    window.marker = this;
+    if (window.addEventListener)
+        window.addEventListener("load", new Function("document.body.appendChild( window.marker.container );"), false);
+    else if (window.attachEvent)
+        window.attachEvent("onload", new Function("document.body.appendChild( window.marker.container );"));
+}
+
+///////////////////////////////////////////////////////////////////////////////
+// Outline class constructor
+///////////////////////////////////////////////////////////////////////////////
+function Outline()
+{
+    this.tree           = new TreeView();
+    this.mountPoint     = null;    
+    this.writeEnabled   = false;
+    this.marker         = new Marker();        
+    this.classRegExp    = new RegExp;
+    this.structRegExp   = new RegExp;
+    this.enumRegExp     = new RegExp;
+    this.templateRegExp = new RegExp;
+    this.aliasRegExp    = new RegExp;
+    this.funcRegExp     = new RegExp;
+    
+    this.incSymbolLevel = function()
+    {
+        if (this.mountPoint == null)
+            this.mountPoint = this.tree.children[ 0 ];
+        else
+            this.mountPoint = this.mountPoint.lastChild();
+    }
+
+    this.decSymbolLevel = function()
+    {
+        // place icons near items according to extracted below type
+        for (var i = 0; i < this.mountPoint.children.length; ++i)
+        {
+            child = this.mountPoint.children[i];
+            var term = child.termRef;
+            
+            // find first span node
+            var n = term.firstChild;
+            while (n && n.nodeName != "SPAN")
+                n = n.nextSibling;
+            
+            if (!n) // shouldn't happen
+                continue;
+            
+            var iconSrc;
+            if (n.firstChild.nodeName == "#text")
+            {
+                var text = n.firstChild.data; // text before declaration
+                
+                if ( this.classRegExp.test(text) )
+                    iconSrc = "candydoc/img/outline/class.gif";
+                else if ( this.structRegExp.test(text) )
+                    iconSrc = "candydoc/img/outline/struct.gif";
+                else if ( this.enumRegExp.test(text) )
+                    iconSrc = "candydoc/img/outline/enum.gif";
+                else if ( this.templateRegExp.test(text) )
+                    iconSrc = "candydoc/img/outline/template.gif";
+                else if ( this.aliasRegExp.test(text) )
+                    iconSrc = "candydoc/img/outline/alias.gif";
+                else // function or variable? check whether '(' ')' exists on the right
+                {
+                    var np = n.firstChild;
+                    while (np && np.nodeName != "SCRIPT") // find our script "onDecl"
+                        np = np.nextSibling;
+                        
+                    if (np && np.nextSibling && np.nextSibling.nodeName == "#text" &&
+                        this.funcRegExp.test(np.nextSibling.data))
+                    {
+                        iconSrc = "candydoc/img/outline/func.gif";
+                    }
+                    else
+                        iconSrc = "candydoc/img/outline/var.gif";
+                }
+            }
+            else // enum member ?
+                iconSrc = "candydoc/img/outline/var.gif";
+                    
+            child.icon.src = iconSrc;
+            child.icon.width = 16;
+            child.icon.height = 16;
+        }
+        
+        this.mountPoint = this.mountPoint.parentNode;
+    }
+
+    this.addDecl = function(decl)
+    {
+        function getLastLeaf(elem)
+        {
+            if (elem.childNodes.length > 0)
+                return getLastLeaf(elem.lastChild);
+            else
+                return elem;
+        }
+
+        function getCurrentTerm()
+        {
+            var ret = getLastLeaf( document.getElementById("content") );
+            while (ret && ret.nodeName != "DT")
+                ret = ret.parentNode;
+            
+            return ret;
+        }
+        
+        if (this.writeEnabled)
+        {
+            var node = this.mountPoint.createChild(decl);
+            node.termRef = getCurrentTerm();
+            node.setOnclick( new Function("explorer.outline.mark(this.termRef);") );
+        }
+    }
+
+    this.mark = function(term)
+    {
+        this.marker.setTo(term);
+        window.scrollTo(0, getTop(term) - getWindowHeight() / 6);    
+    }
+        
+    
+    this.classRegExp.compile("(.*\b)?class(\b.*)?");
+    this.structRegExp.compile("(.*\b)?struct(\b.*)?");
+    this.enumRegExp.compile("(.*\b)?enum(\b.*)?");
+    this.templateRegExp.compile("(.*\b)?template(\b.*)?");
+    this.aliasRegExp.compile("(.*\b)?alias(\b.*)?");
+    this.funcRegExp.compile(/.*\(.*/);    
+}
+
+
+
+
+///////////////////////////////////////////////////////////////////////////////
+// Package explorer class constructor
+///////////////////////////////////////////////////////////////////////////////
+function PackageExplorer()
+{
+    this.tree = new TreeView(true);    
+    
+    this.addModule2 = function(mod, full)
+    {
+        var moduleIco = "candydoc/img/outline/module.gif";
+        var packageIco = "candydoc/img/outline/package.gif";
+
+        var path = mod.split("\.");
+        var node = this.tree.branch(path[0]);
+        if ( !node )
+            node = this.tree.createBranch(path[0], (path.length == 1) ? moduleIco : packageIco);
+        
+        for (var i = 1; i < path.length; ++i)
+        {
+            var prev = node;
+            node = node.child(path[i]);
+            if (!node)
+                node = prev.createChild(path[i], (path.length == i + 1) ? moduleIco : packageIco);
+                
+            if (path.length == i + 1) {
+                if (full)
+                    node.setRef(mod + ".html");
+                else
+                    node.setRef(path[i] + ".html");
+            }
+        }
+    }
+    
+    this.addModuleFull = function(mod)
+    {
+        this.addModule2(mod, true);
+    }
+    
+    this.addModule = function(mod)
+    {
+        this.addModule2(mod, false);
+    }
+}
+
+
+
+///////////////////////////////////////////////////////////////////////////////
+// Explorer class constructor
+///////////////////////////////////////////////////////////////////////////////
+function Explorer()
+{
+    this.outline         = new Outline();
+    this.packageExplorer = new PackageExplorer();
+    this.tabs            = new Array();
+    this.tabCount        = 0;
+    
+    this.initialize = function(moduleName)
+    {
+        this.tabArea = document.getElementById("tabarea");
+        this.clientArea = document.getElementById("explorerclient");
+        
+        // prevent text selection
+        this.tabArea.onmousedown = new Function("return false;");
+        this.tabArea.onclick = new Function("return true;");
+        this.tabArea.onselectstart = new Function("return false;");
+        this.clientArea.onmousedown = new Function("return false;");
+        this.clientArea.onclick = new Function("return true;");
+        this.clientArea.onselectstart = new Function("return false;");
+        
+        this.outline.tree.createBranch( moduleName, "candydoc/img/outline/module.gif" );
+        
+        // create tabs
+        this.createTab("Outline", this.outline.tree.domEntry);
+        this.createTab("Package", this.packageExplorer.tree.domEntry);
+    }
+    
+    this.createTab = function(name, domEntry)
+    {
+        var tab = new Object();
+        this.tabs[name] = tab;
+        this.tabCount++;
+        
+        tab.domEntry = domEntry;
+        tab.labelSpan = document.createElement("span");
+        
+        if (this.tabCount > 1)
+        {
+            tab.labelSpan.className = "inactivetab";
+            tab.domEntry.style.display = "none";
+        }
+        else
+        {
+            tab.labelSpan.className = "activetab";
+            tab.domEntry.style.display = "";
+        }
+        
+        tab.labelSpan.appendChild( document.createTextNode(name) );
+        tab.labelSpan.owner = this;
+        tab.labelSpan.onclick = new Function("this.owner.setSelection('" + name + "');");
+        
+        this.tabArea.appendChild( tab.labelSpan );
+        this.clientArea.appendChild( domEntry );
+    }
+    
+    this.setSelection = function(tabName)
+    {
+        for (name in this.tabs)
+        {
+            this.tabs[name].labelSpan.className = "inactivetab";
+            this.tabs[name].domEntry.style.display = "none";
+        }
+        
+        this.tabs[tabName].labelSpan.className = "activetab";
+        this.tabs[tabName].domEntry.style.display = "";
+    }
+}

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/docs/candydoc/ie56hack.css	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,21 @@
+/* This file is a part of CanDyDOC fileset.
+   File is written by Victor Nakoryakov and placed into the public domain.
+
+   This file is CSS to work around IE6 and earlier bugs. It's included just
+   in these browsers. */
+
+
+/* Some magic to emulate unsupported "position: fixed" style. */
+#tabarea
+{
+	_position: absolute;
+	_top: expression(eval(document.body.scrollTop+8));
+}
+
+/* ditto */
+#explorerclient 
+{
+	_position: absolute;
+	_top: expression(eval(document.body.scrollTop+24));
+	_height: expression(eval(document.body.clientHeight-48));
+}

Binary file docs/candydoc/img/bg.gif has changed

Binary file docs/candydoc/img/candydoc.gif has changed

Binary file docs/candydoc/img/outline/alias.gif has changed

Binary file docs/candydoc/img/outline/bg.gif has changed

Binary file docs/candydoc/img/outline/class.gif has changed

Binary file docs/candydoc/img/outline/enum.gif has changed

Binary file docs/candydoc/img/outline/func.gif has changed

Binary file docs/candydoc/img/outline/module.gif has changed

Binary file docs/candydoc/img/outline/package.gif has changed

Binary file docs/candydoc/img/outline/struct.gif has changed

Binary file docs/candydoc/img/outline/template.gif has changed

Binary file docs/candydoc/img/outline/var.gif has changed

Binary file docs/candydoc/img/package/bg.gif has changed

Binary file docs/candydoc/img/tree/shim.gif has changed

Binary file docs/candydoc/img/tree/tb.gif has changed

Binary file docs/candydoc/img/tree/tbr.gif has changed

Binary file docs/candydoc/img/tree/tbrm.gif has changed

Binary file docs/candydoc/img/tree/tbrp.gif has changed

Binary file docs/candydoc/img/tree/tr.gif has changed

Binary file docs/candydoc/img/tree/trm.gif has changed

Binary file docs/candydoc/img/tree/trp.gif has changed

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/docs/candydoc/modules.ddoc	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,14 @@
+MODULES =
+	$(MODULE_FULL parser.Action)
+	$(MODULE_FULL parser.Parser)
+	$(MODULE_FULL ast.Decl)
+	$(MODULE_FULL ast.Stmt)
+	$(MODULE_FULL ast.Expr)
+	$(MODULE_FULL lexer.Keyword)
+	$(MODULE_FULL lexer.Lexer)
+	$(MODULE_FULL lexer.Token)
+	$(MODULE_FULL basic.SmallArray)
+	$(MODULE_FULL basic.Message)
+	$(MODULE_FULL basic.SourceLocation)
+	$(MODULE_FULL basic.Messages)
+	$(MODULE_FULL basic.SourceManager)

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/docs/candydoc/style.css	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,169 @@
+/* This file is a part of CanDyDOC fileset.
+   File is written by Victor Nakoryakov and placed into the public domain.
+
+   This file is main CSS file of CanDyDOC. You may adjust some part of
+   parameters to control how result documentation would looks like. See
+   further documentation for details. */
+
+
+
+/* This controls how background would looks like and
+   sets some document-scope defaults. */
+body 
+{
+	/* These parameters control default font. */
+	font-family: Verdana, Arial, Helvetica, sans-serif;
+	font-size: 10pt;
+	color: #666666;
+	
+	/* These control look of background. Note that you have to use
+       fixed background to keep documentation good-looking in
+       IE6 and earlier. Otherwise whole *explorer* will jerk while
+       scrolling. If you do not want to use background at all use
+       some invalid url, e.g. url(foo). */
+	background-color: #e6fcea;
+	background: url(img/bg.gif) fixed;
+	
+	/* Don't touch. Necessary for IE6 and earlier. */
+	height: 100%;	
+}
+
+
+
+/* Style applied to all tables. Actualy there are two: one table is
+   that contains contant and footer with CanDyDOC logo, and others
+   are that contains functions' parameters description. */
+table 
+{
+	font-family: Verdana, Arial, Helvetica, sans-serif;
+	font-size: 10pt;
+	color: #666666;
+	text-align: justify;
+}
+
+
+/* Style used for all hyperlinks. */
+a:link {  color: #009900; text-decoration: none }
+a:visited {  color: #009999; text-decoration: none }
+a:hover {  color: #0033cc; text-decoration: none }
+a:active {  color: #0033cc; text-decoration: none }
+
+/*
+table.matrix 
+{
+	border-left: double 3px #666666;
+	border-right: double 3px #666666;
+	margin-left: 3em;
+}
+*/
+
+/* Style appled to declarations. E.g. 'void foo(int a, float b);' */
+span.decl { font-size: 10pt; font-weight: bold; color: #000000; text-align: left }
+/* Style appled to current declaration's symbol. E.g. 'foo' in 'void foo(int a, float b);' */
+span.currsymbol { font-size: 12pt; color: #009900 }
+/* Style appled to function's parameters. E.g. 'a' and 'b' in 'void foo(int a, float b);' */
+span.funcparam  { font-style: italic; font-weight: normal; color: #331200 }
+
+/* Style for div that actualy contains documenation. */
+#content
+{
+	padding-right: 8px;
+	position: absolute;
+	left: 245px;
+	top: 8px;
+	text-align: justify;
+}
+
+/* Style for table that is inside div considered above. Contains documentaton
+   itself and footer with CanDyDOC logo. */
+table.content
+{
+	margin-bottom: 8px;
+	border-spacing: 0px;
+	border-collapse: collapse;
+	background-color: #ffffff;
+}
+
+/* Style for cell of above considered table that contains documentation itself. */
+#docbody
+{
+	padding: 8px 20px 8px 20px;
+	border: solid 1px #009900;
+}
+
+/* Style for cell that contains CanDyDOC logo. */
+#docfooter
+{
+	height: 16px;
+	background-color: #ddeedd;
+	padding: 0px 8px 0px 8px;
+	border: solid 1px #009900;
+}
+
+/* Style applied to currently active tab of explorer window. */
+span.activetab
+{
+	background-color: #0033cc;
+	border-top: solid 2px #009900;
+	color: #ffffff;
+	font-weight: bold;
+	padding-left: 4px;
+	padding-right: 4px;
+	padding-top: 1px;
+	margin-right: 1px;
+}
+
+/* Style applied to currently inactive tab of explorer window. */
+span.inactivetab
+{
+	background-color: #000066;
+	color: #cccccc;
+	font-weight: normal;
+	padding-left: 4px;
+	padding-right: 4px;
+	padding-top: 0px;
+	margin-right: 1px;
+}
+
+/* Style applied to div that contains tabs of explorer. Note that if
+   you want to change it's position you have to change position of
+   #explorerclient, #content and corresponding values in ie56hack.css */
+#tabarea
+{
+	position: fixed;
+	top: 8px;
+	width: 205px;
+	height: 16px;
+	cursor: default;
+}
+
+
+/* Style applied to div that contains tree in explorer. Note that if
+   you want to change it's position you have to change position of
+   #tabarea, #content and corresponding values in ie56hack.css */
+#explorerclient 
+{
+	position: fixed;
+	top: 24px;
+	bottom: 8px;
+	width: 205px;
+	overflow: auto;
+	background-color: #fcfffc;
+	border: solid 2px #0033cc;
+	padding: 4px;
+	cursor: default;
+	color: Black;
+}
+
+/* Following 3 styles control appearance of marker that appears
+   if you click some entity in outline window. */
+div.markertop	{ border-left: solid 2px #0033cc;}
+div.markermiddle{ border-left: dotted 2px #0033cc;}
+div.markerbottom{ border-left: dotted 2px #66cc66;}
+
+/* Style applied to preformated text used to show examples. */
+pre.d_code
+{
+	border: dotted 1px #9c9;
+	background-color: #eeffee;
+}
\ No newline at end of file

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/docs/candydoc/tree.js	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,374 @@
+/* This file is a part of CanDyDOC fileset.
+   File is written by Victor Nakoryakov and placed into the public domain.
+
+   This file is javascript with classes that represents native style tree control. */
+   
+var pmNone = 0;
+var pmPlus = 1;
+var pmMinus = 2;
+
+var hlNone = 0;
+var hlGrey = 1;
+var hlSelected = 2;
+
+function TreeView(hrefMode)
+{
+    this.domEntry = document.createElement("div");
+    this.children = new Array();
+    this.selection = null;
+    this.hrefMode = hrefMode;
+    
+    this.createBranch = function(text, iconSrc)
+    {
+        var root = new TreeNode(text, iconSrc, this.hrefMode);
+        root.owner = this;
+        this.children[ this.children.length ] = root;
+        this.domEntry.appendChild( root.domEntry );
+        return root;
+    }
+    
+    this.branch = function(text)
+    {
+        var ret = null;
+        for (var i = 0; i < this.children.length; ++i)
+            if (this.children[i].textElement.data == text)
+            {
+                ret = this.children[i];
+                break;
+            }
+            
+        return ret;
+    }
+    
+    this.domEntry.style.fontSize = "10px";
+    this.domEntry.style.cursor = "default";
+    this.domEntry.style.whiteSpace = "nowrap";
+}
+
+var idCounter = 0;
+function TreeNode(text, iconSrc, hrefMode)
+{
+    this.id             = idCounter++;
+    this.parentNode     = null;
+    this.children       = new Array();
+    this.domEntry       = document.createElement("div");
+    this.icon           = document.createElement("img");
+    this.textElement    = document.createTextNode(text);
+    this.textSpan       = document.createElement("span");
+    this.lineDiv        = document.createElement("div");
+    this.hierarchyImgs  = new Array();
+    this.onclick        = null;
+    
+    function createIcon()
+    {
+        var img = document.createElement("img");
+        img.style.verticalAlign = "middle";
+        img.style.position = "relative";
+        img.style.top = "-1px";
+        img.width = 16;
+        img.height = 16;
+        return img;
+    }
+    
+    function createHierarchyImage()
+    {
+        var img = createIcon();
+        img.pointsTop = false;
+        img.pointsBottom = false;
+        img.pointsRight = false;
+        img.pmState = pmNone;
+        return img;
+    }
+    
+    function genHierarchyImageSrc(hierarchyImg)
+    {
+        var name = "";
+        if (hierarchyImg.pointsTop)
+            name += "t";
+            
+        if (hierarchyImg.pointsBottom)
+            name += "b";
+            
+        if (hierarchyImg.pointsRight)
+            name += "r";
+            
+        if (hierarchyImg.pmState == pmPlus)
+            name += "p";
+        else if (hierarchyImg.pmState == pmMinus)
+            name += "m";
+        
+        if (name == "")
+            name = "shim";
+        
+        return "candydoc/img/tree/" + name + ".gif";
+    }
+    
+    function setSrc(icon, src)
+    {
+        icon.src = src;
+        // After src change width and height are reseted in IE.
+        // Bug workaround:
+        icon.width = 16;
+        icon.height = 16;
+    }
+    
+    this.createChild = function(text, iconSrc)
+    {
+        var child = new TreeNode(text, iconSrc, this.owner.hrefMode);
+        this.children[ this.children.length ] = child;
+        this.domEntry.appendChild( child.domEntry );
+        child.parentNode = this;
+        child.owner = this.owner;
+        
+        // insert hierarchy images according to deepness level
+        // of created child.
+        
+        if (this.children.length > 1)
+        {
+            // there were already added child before. So copy `level-1`
+            // hierarchy images from it.
+            
+            var prevAddedChild = this.children[ this.children.length - 2 ];
+            
+            for (var i = 0; i < prevAddedChild.hierarchyImgs.length - 1; ++i)
+            {
+                var prevAddedChildImg = prevAddedChild.hierarchyImgs[i];
+                var img = createHierarchyImage();
+                setSrc(img, prevAddedChildImg.src);
+                img.pointsTop = prevAddedChildImg.pointsTop;
+                img.pointsBottom = prevAddedChildImg.pointsBottom;
+                img.pointsRight = prevAddedChildImg.pointsRight;
+                img.pmState = prevAddedChildImg.pmState;
+                
+                child.hierarchyImgs[ child.hierarchyImgs.length ] = img;
+                child.lineDiv.insertBefore(img, child.icon);
+            }
+            
+            // change last hierarchy image of prevAddedChild from |_ to |-
+            var lastHierarchyImg = prevAddedChild.hierarchyImgs[ prevAddedChild.hierarchyImgs.length - 1 ];
+            lastHierarchyImg.pointsBottom = true;
+            setSrc(lastHierarchyImg, genHierarchyImageSrc(lastHierarchyImg));
+                        
+            // change hierarchy images of prevAddedChild's children on it's last
+            // level to |
+            prevAddedChild.addHierarchyTBLine(prevAddedChild.hierarchyImgs.length - 1);
+        }
+        else
+        {
+            // this is a first child. So copy `level-2`
+            // hierarchy images from parent, i.e. this.
+            
+            for (var i = 0; i < this.hierarchyImgs.length - 1; ++i)
+            {
+                var parentImg = this.hierarchyImgs[i];
+                var img = createHierarchyImage();
+                setSrc(img, parentImg.src);
+                img.pointsTop = parentImg.pointsTop;
+                img.pointsBottom = parentImg.pointsBottom;
+                img.pointsRight = parentImg.pointsRight;
+                img.pmState = parentImg.pmState;
+                
+                child.hierarchyImgs[ child.hierarchyImgs.length ] = img;
+                child.lineDiv.insertBefore(img, child.icon);
+            }
+            
+            if (this.hierarchyImgs.length > 0) // we are not root
+            {
+                // change last hierarchy image of parent (i.e. this): add minus to it
+                var lastHierarchyImg = this.hierarchyImgs[ this.hierarchyImgs.length - 1];
+                lastHierarchyImg.pmState = pmMinus;
+                setSrc(lastHierarchyImg, genHierarchyImageSrc(lastHierarchyImg));
+                lastHierarchyImg.owner = this;
+                lastHierarchyImg.onclick = new Function("e", "this.owner.processPMClick(e);");
+                
+                // make decision on image on `level-1`. It depends on parent's (ie this)
+                // image on same level.
+                var parentL1HierarchyImg = lastHierarchyImg;
+                var l1HierarchyImg = createHierarchyImage();
+                if (parentL1HierarchyImg.pointsBottom)
+                {
+                    l1HierarchyImg.pointsTop = true;
+                    l1HierarchyImg.pointsBottom = true;
+                }
+                setSrc(l1HierarchyImg, genHierarchyImageSrc(l1HierarchyImg));
+                child.hierarchyImgs[ child.hierarchyImgs.length ] = l1HierarchyImg;
+                child.lineDiv.insertBefore(l1HierarchyImg, child.icon);
+            }
+        }
+        
+        // in any case on last level our child will have icon |_
+        var img = createHierarchyImage();
+        img.pointsTop = true;
+        img.pointsRight = true;
+        setSrc(img, genHierarchyImageSrc(img));
+        
+        child.hierarchyImgs[ child.hierarchyImgs.length ] = img;
+        child.lineDiv.insertBefore(img, child.icon);
+        
+        return child;
+    }
+    
+    this.lastChild = function()
+    {
+        return this.children[ this.children.length - 1 ];
+    }
+    
+    this.child = function(text)
+    {
+        var ret = null;
+        for (var i = 0; i < this.children.length; ++i)
+            if (this.children[i].textElement.data == text)
+            {
+                ret = this.children[i];
+                break;
+            }
+            
+        return ret;
+    }
+    
+    this.addHierarchyTBLine = function(level)
+    {
+        for (var i = 0; i < this.children.length; ++i)
+        {
+            var img = this.children[i].hierarchyImgs[level];
+            img.pointsTop = true;
+            img.pointsBottom = true;
+            setSrc(img, genHierarchyImageSrc(img));
+            this.children[i].addHierarchyTBLine(level);
+        }
+    }
+    
+    this.expand = function()
+    {
+        var img = this.hierarchyImgs[ this.hierarchyImgs.length - 1 ];
+        
+        if (img.pmState == pmPlus)
+        {
+            img.pmState = pmMinus;
+            setSrc(img, genHierarchyImageSrc(img));
+            
+            for (var i = 0; i < this.children.length; ++i)
+                this.children[i].domEntry.style.display = "";
+        }
+    }
+    
+    this.collapse = function()
+    {
+        var img = this.hierarchyImgs[ this.hierarchyImgs.length - 1 ];
+        
+        if (img.pmState == pmMinus)
+        {
+            img.pmState = pmPlus;
+            setSrc(img, genHierarchyImageSrc(img));
+            
+            for (var i = 0; i < this.children.length; ++i)
+                this.children[i].domEntry.style.display = "none";
+        }
+    }
+    
+    this.toggle = function()
+    {
+        var img = this.hierarchyImgs[ this.hierarchyImgs.length - 1 ];
+        if (img.pmState == pmMinus)
+            this.collapse();
+        else
+            this.expand();
+    }
+    
+    this.select = function()
+    {
+        if (this.owner.selection != this)
+        {
+            if (this.owner.selection)
+                this.owner.selection.setHighlight(hlNone);
+                
+            this.owner.selection = this;
+            this.setHighlight(hlSelected);
+        }
+    }
+    
+    this.setHighlight = function(mode)
+    {
+        if (mode == hlNone)
+        {
+            this.textSpan.style.backgroundColor = "";
+            this.textSpan.style.color = "";
+            this.textSpan.style.border = "";
+        }
+        else if (mode == hlGrey)
+        {
+            this.textSpan.style.backgroundColor = "#aaaaaa";
+            this.textSpan.style.color = "";
+            this.textSpan.style.border = "";
+        }
+        else if (mode == hlSelected)
+        {
+            this.textSpan.style.backgroundColor = "3399cc";
+            this.textSpan.style.color = "white";
+            this.textSpan.style.border = "dotted 1px red";
+        }
+    }
+    
+    this.setOnclick = function(proc)
+    {
+        this.onclick = proc;
+    }
+    
+    this.setRef = function(url)
+    {
+        if (this.anchor)
+            this.anchor.href = url;
+    }
+    
+    this.processPMClick = function(e)
+    {
+        this.toggle();
+        
+        // prevent this line selection, stop bubbling
+        if (e)
+            e.stopPropagation(); // Mozilla way
+        if (window.event)
+            window.event.cancelBubble = true; // IE way
+    }
+    
+    this.processOnclick = function()
+    {
+        this.select();
+        if (this.onclick instanceof Function)
+            this.onclick();
+    }
+    
+    ///////////////////////////////////////////////////////////////////////////
+    if (iconSrc)
+        this.icon.src = iconSrc;
+    else
+    {
+        this.icon.width = 0;
+        this.icon.height = 0;
+    }
+    
+    this.icon.style.verticalAlign = "middle";
+    this.icon.style.position = "relative";
+    this.icon.style.top = "-1px";
+    this.icon.style.paddingRight = "2px";
+    
+    if (!hrefMode)
+    {
+        this.textSpan.appendChild( this.textElement );
+    }
+    else
+    {
+        this.anchor = document.createElement("a");
+        this.anchor.appendChild( this.textElement );
+        this.textSpan.appendChild( this.anchor );
+    }
+    
+    this.lineDiv.appendChild( this.icon );
+    this.lineDiv.appendChild( this.textSpan );
+    this.domEntry.appendChild( this.lineDiv );
+    
+    this.lineDiv.owner = this;
+    
+    if (!hrefMode)
+        this.lineDiv.onclick = new Function("this.owner.processOnclick();");
+}

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/docs/candydoc/util.js	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,41 @@
+/* This file is a part of CanDyDOC fileset.
+   File is written by Victor Nakoryakov and placed into the public domain.
+
+   This file is javascript with cross-browser utility functions. */
+
+function getLeft(elem)
+{
+    var ret = 0;
+	while (elem.offsetParent)
+	{
+		ret += elem.offsetLeft;
+		elem = elem.offsetParent;
+	}
+
+	return ret;
+}
+
+function getTop(elem)
+{
+    var ret = 0;
+	while (elem.offsetParent)
+	{
+		ret += elem.offsetTop;
+		elem = elem.offsetParent;
+	}
+
+	return ret;
+}
+
+function getWindowHeight()
+{
+    var ret = 0;
+    if (typeof(window.innerHeight) == "number")
+        ret = window.innerHeight;
+    else if (document.documentElement && document.documentElement.clientHeight)
+        ret = document.documentElement.clientHeight;
+    else if (document.body && document.body.clientHeight)
+        ret = document.body.clientHeight;
+    
+    return ret;
+}

--- a/dsss.conf	Mon Aug 11 21:56:21 2008 +0200
+++ b/dsss.conf	Tue Aug 12 18:14:56 2008 +0200
@@ -1,6 +1,4 @@
 
-[ast]
-buildflags = -version=Tango -candydoc -Dqdoc -I.
+[src]
+buildflags = -version=Tango -candydoc -Dqdocs -I./src
 
-
-

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/ast/Decl.d	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,137 @@
+module ast.Decl;
+
+import ast.Expr;
+
+/**
+  The base class for all Declarations. 
+  
+  Declarations comes in two forms:
+
+    $(OL
+    $(LI members, such as variables and functions.)
+    $(LI types, such as classes, structs.))
+
+  */
+class Decl
+{
+
+    /// Method for doing cast(FunctionDecl)
+    FunctionDecl asFunctionDecl() { return null;}
+
+    /// Returns true if it is a FunctionDecl
+    bool isFunctionDecl() { return false;}
+
+    /// Method for doing cast(VarDecl)
+    VarDecl asVarDecl() { return null;}
+
+    /// Returns true if it is a VarDecl
+    bool isVarDecl() { return false;}
+
+    /// Method for doing cast(StructDecl)
+    StructDecl asStructDecl() { return null;}
+
+    /// Returns true if it is a StructDecl
+    bool isStructDecl() { return false;}
+
+    /// Method for doing cast(ClassDecl)
+    ClassDecl asClassDecl() { return null;}
+
+    /// Returns true if it is a ClassDecl
+    bool isClassDecl() { return false;}
+
+    /// Method for doing cast(InterfaceDecl)
+    InterfaceDecl asInterfaceDecl() { return null;}
+
+    /// Returns true if it is a InterfaceDecl
+    bool isInterfaceDecl() { return false;}
+
+    /// Method for doing cast(TypedefDecl)
+    TypedefDecl asTypedefDecl() { return null;}
+
+    /// Returns true if it is a TypedefDecl
+    bool isTypedefDecl() { return false;}
+}
+
+/**
+  The FunctionDecl contains a set of VarDecls, being the parameters of the
+  method. It also contains a potentiel list of statements.
+  */
+class FunctionDecl : Decl
+{
+    /// Returns the parameters of the method.
+    VarDecl[] getParams() { return params;}
+    /// Return the parameter on a given index.
+    VarDecl getParam(int index) { return params[index];}
+    /// Returns the number of parameters.
+    int getNumberOfParamst() { return params.length;}
+    /**
+      Returns the number of required arguments, that should be given to
+      call this method.
+      */
+    int getMinimumNumberOfParams() 
+    { 
+        assert(0, "Unimplemented");
+        return 0;
+    }
+
+    override FunctionDecl asFunctionDecl() { return this;}
+    override bool isFunctionDecl() { return true;}
+
+private:
+    VarDecl[] params;
+}
+
+/**
+  The VarDecl contains as a minimum a Type. As an addition, i will also
+  in most cases contain an Identifier that it'll be reconized by and in
+  some cases it will also contain an expression that'll be it initializer.
+
+  Some cases to check:
+
+  $(UL
+      $(LI
+          If the VarDecl is a param in a FunctionDecl the initializer, if
+          present, should be a constant expression(Enum, Number, String 
+          or the like).
+        )
+    )
+  */
+class VarDecl : Decl
+{
+    /// Return true if the VarDecl has an identifier/name.
+    bool hasIdentifier() { return !(identifier is null);}
+    /// Return true if the VarDecl has en initializer.
+    bool hasInitializer() { return !(initializer is null);}
+
+    override VarDecl asVarDecl() { return this;}
+    override bool isVarDecl() { return true;}
+    
+private:
+    Identifier identifier;
+    Expr initializer;
+}
+
+class StructDecl : Decl
+{
+    override StructDecl asStructDecl() { return this;}
+    override bool isStructDecl() { return true;}
+}
+
+class ClassDecl : Decl
+{
+    override ClassDecl asClassDecl() { return this;}
+    override bool isClassDecl() { return true;}
+}
+
+class InterfaceDecl : Decl
+{
+    override InterfaceDecl asInterfaceDecl() { return this;}
+    override bool isInterfaceDecl() { return true;}
+}
+
+class TypedefDecl : Decl
+{
+    override TypedefDecl asTypedefDecl() { return this;}
+    override bool isTypedefDecl() { return true;}
+}
+

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/ast/Expr.d	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,203 @@
+module ast.Expr;
+
+/**
+  The base class for all Expressions.
+  */
+class Expr
+{
+    /// Get the type of the Expr
+    Object getType() 
+    {
+        assert(0, "Unimplemented");
+        return null;
+    }
+
+    /// Set the type of the Expr
+    void setType(Object type) 
+    {
+        assert(0, "Unimplemented");
+    }
+
+    /// Returns true if the Expr can be compile-time evaluated.
+    bool isConstantExpr() { return false; }
+
+    NumberLiteral asNumberLiteral() { return null; }
+    bool isNumberLiteral() { return false; }
+
+    StringLiteral asStringLiteral() { return null; }
+    bool isStringLiteral() { return false; }
+
+    ArrayLiteral asArrayLiteral() { return null; }
+    bool isArrayLiteral() { return false; }
+
+    Assign asAssign() { return null; }
+    bool isAssign() { return false; }
+
+    Binary asBinary() { return null; }
+    bool isBinary() { return false; }
+
+    Negate asNegate() { return null; }
+    bool isNegate() { return false; }
+
+    Deref asDeref() { return null; }
+    bool isDeref() { return false; }
+
+    AddressOf asAddressOf() { return null; }
+    bool isAddressOf() { return false; }
+
+    Index asIndex() { return null; }
+    bool isIndex() { return false; }
+
+    Identifier asIdentifier() { return null; }
+    bool isIdentifier() { return false; }
+
+    Member asMember() { return null; }
+    bool isMember() { return false; }
+
+private:
+/// FIXME: Add DType? here
+}
+
+/**
+  NumberLiteral
+  */
+/// FIXME: Should there be an IntegerLiteral and FloatLiteral instead?
+class NumberLiteral : Expr
+{
+    override bool isConstantExpr() { return true; }
+
+    override NumberLiteral asNumberLiteral() { return this; }
+    override bool isNumberLiteral() { return true; }
+}
+
+/**
+  StringLiteral
+  */
+class StringLiteral : Expr
+{
+    override bool isConstantExpr() { return true; }
+
+    override StringLiteral asStringLiteral() { return this; }
+    override bool isStringLiteral() { return true; }
+}
+
+/**
+  ArrayLiteral
+  */
+class ArrayLiteral : Expr
+{
+    /// Return the arguments for the ArrayLiteral
+    Expr[] getArguments() { return arguments; }
+
+    /// Return a given argument for the ArrayLiteral
+    Expr getArgument(int index) { return arguments[index]; }
+
+    /// Get the count of arguments for the ArrayLiteral
+    int getArgumentCount() { return arguments.length; }
+
+    override bool isConstantExpr() 
+    {
+        /**
+          If all the arguments to the ArrayLiteral is an constant Expr, then
+          this ArrayLiteral can be considered an constant Expr aswell.
+          */
+        // FIXME: consider if it should save the result
+        foreach (arg; arguments)
+            if (!arg.isConstantExpr())
+                return false;
+        return true; 
+    }
+
+    override ArrayLiteral asArrayLiteral() { return this; }
+    override bool isArrayLiteral() { return true; }
+
+private:
+    Expr[] arguments;
+}
+
+/**
+  The Assign expression contains two expression, a left and a right side, 
+  left being a lvalue, right being a rvalue. 
+
+  If the right side ain't the same type as the left type, the right side will
+  try to be promoted through an implicit cast. If this failes, an error must
+  be given.
+  */
+class Assign : Expr
+{
+    override Assign asAssign() { return this; }
+    override bool isAssign() { return true; }
+
+private:
+    Expr left, right;
+}
+
+/**
+  Binary
+  */
+class Binary : Expr
+{
+    override Binary asBinary() { return this; }
+    override bool isBinary() { return true; }
+
+private:
+    Expr left, right;
+}
+
+/**
+  Negate
+  */
+class Negate : Expr
+{
+    override Negate asNegate() { return this; }
+    override bool isNegate() { return true; }
+
+private:
+    Expr expr;
+}
+
+/**
+  Deref
+  */
+class Deref : Expr
+{
+    override Deref asDeref() { return this; }
+    override bool isDeref() { return true; }
+}
+
+/**
+  AddressOf
+  */
+class AddressOf : Expr
+{
+    override AddressOf asAddressOf() { return this; }
+    override bool isAddressOf() { return true; }
+}
+
+/**
+  Index
+  */
+class Index : Expr
+{
+    override Index asIndex() { return this; }
+    override bool isIndex() { return true; }
+}
+
+/**
+  Identifier
+  */
+class Identifier : Expr
+{
+    override Identifier asIdentifier() { return this; }
+    override bool isIdentifier() { return true; }
+}
+
+/**
+  Member
+  */
+class Member : Expr
+{
+    override Member asMember() { return this; }
+    override bool isMember() { return true; }
+}
+

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/ast/Stmt.d	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,127 @@
+module ast.Stmt;
+
+/**
+  The base class for all Statements.
+  */
+class Stmt
+{
+    bool isCompoundStmt() { return false; }
+    CompoundStmt asCompoundStmt() { return null; }
+
+    bool isDeclStmt() { return false; }
+    DeclStmt asDeclStmt() { return null; }
+
+    bool isExpStmt() { return false; }
+    ExpStmt asExpStmt() { return null; }
+
+    bool isReturnStmt() { return false; }
+    ReturnStmt asReturnStmt() { return null; }
+
+    bool isIfStmt() { return false; }
+    IfStmt asIfStmt() { return null; }
+
+    bool isWhileStmt() { return false; }
+    WhileStmt asWhileStmt() { return null; }
+
+    bool isForStmt() { return false; }
+    ForStmt asForStmt() { return null; }
+
+    bool isSwitchStmt() { return false; }
+    SwitchStmt asSwitchStmt() { return null; }
+
+    bool isForeachStmt() { return false; }
+    ForeachStmt asForeachStmt() { return null; }
+
+    bool isAssertStmt() { return false; }
+    AssertStmt asAssertStmt() { return null; }
+}
+
+/**
+  CompoundStmt
+  */
+class CompoundStmt : Stmt
+{
+    override bool isCompoundStmt() { return true; }
+    override CompoundStmt asCompoundStmt() { return this; }
+}
+
+/**
+  DeclStmt
+  */
+class DeclStmt : Stmt
+{
+    override bool isDeclStmt() { return true; }
+    override DeclStmt asDeclStmt() { return this; }
+}
+
+/**
+  ExpStmt
+  */
+class ExpStmt : Stmt
+{
+    override bool isExpStmt() { return true; }
+    override ExpStmt asExpStmt() { return this; }
+}
+
+/**
+  ReturnStmt
+  */
+class ReturnStmt : Stmt
+{
+    override bool isReturnStmt() { return true; }
+    override ReturnStmt asReturnStmt() { return this; }
+}
+
+/**
+  IfStmt
+  */
+class IfStmt : Stmt
+{
+    override bool isIfStmt() { return true; }
+    override IfStmt asIfStmt() { return this; }
+}
+
+/**
+  WhileStmt
+  */
+class WhileStmt : Stmt
+{
+    override bool isWhileStmt() { return true; }
+    override WhileStmt asWhileStmt() { return this; }
+}
+
+/**
+  ForStmt
+  */
+class ForStmt : Stmt
+{
+    override bool isForStmt() { return true; }
+    override ForStmt asForStmt() { return this; }
+}
+
+/**
+  SwitchStmt
+  */
+class SwitchStmt : Stmt
+{
+    override bool isSwitchStmt() { return true; }
+    override SwitchStmt asSwitchStmt() { return this; }
+}
+
+/**
+  ForeachStmt
+  */
+class ForeachStmt : Stmt
+{
+    override bool isForeachStmt() { return true; }
+    override ForeachStmt asForeachStmt() { return this; }
+}
+
+/**
+  AssertStmt
+  */
+class AssertStmt : Stmt
+{
+    override bool isAssertStmt() { return true; }
+    override AssertStmt asAssertStmt() { return this; }
+}

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/basic/Message.d	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,163 @@
+module basic.Message;
+
+import tango.core.Exception,
+       Array = tango.core.Array,
+       tango.io.Stdout,
+       tango.text.Util;
+
+import tango.stdc.stdlib;
+
+import llvm.type;
+
+import lexer.Token,
+       lexer.Lexer;
+
+import basic.SourceLocation,
+       basic.SourceManager;
+
+public import basic.Messages;
+
+enum ExitLevel
+{
+    Normal = 1,
+    Lexer = 2,
+    Parser = 3,
+    Semantic = 3,
+}
+
+class MessageHandler
+{
+public:
+
+    this(SourceManager src_mgr)
+    {
+        this.src_mgr = src_mgr;
+    }
+
+    Message report(uint opcode, SLoc location)
+    {
+        Message m = new Message(opcode, location, src_mgr, this);
+        messages ~= m;
+        return m;
+    }
+
+    void checkErrors(ExitLevel exitlevel = ExitLevel.Normal)
+    {
+        if(messages.length == 0)
+            return;
+
+        if(warnings)
+            checkWarnings;
+        foreach(m ; messages)
+            if(m.type == MessageType.Error)
+            {
+                Stdout(m).newline;
+            }
+
+        exit(exitlevel);
+    }
+
+    void checkWarnings()
+    {
+        foreach(m ; messages)
+            if(m.type == MessageType.Warning)
+            {
+                Stdout(m).newline;
+            }
+    }
+
+    void showWarnings(bool value)
+    {
+        warnings = value;
+    }
+
+private:
+    Message[] messages;
+    SourceManager src_mgr;
+    bool warnings;
+}
+
+class Message
+{
+
+    this(int opcode, SLoc location, SourceManager src_mgr, MessageHandler msg_handler)
+    {
+        this.src_mgr = src_mgr;
+        this.location = location;
+        args ~= Messages[opcode].message;
+        this.type = Messages[opcode].type;
+        this.msg_handler = msg_handler;
+    }
+
+    char[] toString()
+    {
+        char[256] tmp = void;
+        char[] msg = layout(tmp, args);
+
+        Lexer l = new Lexer(location, src_mgr, new MessageHandler(src_mgr));
+
+        Token t = l.next;
+        
+        if (src_mgr.getRawData(location).length > 0)
+            msg = src_mgr.getLocationAsString(location) ~ ": " ~ msg;
+        else
+            msg = msg.dup;
+
+
+        char[] line = src_mgr.getLine(location);
+        char[] marks = line.dup;
+        marks[] = ' ';
+        size_t p = src_mgr.getColumn(location);
+        marks[p .. p + t.length] = '^';
+
+        msg ~= "\n    ";
+        msg ~= line;
+        msg ~= "\n    ";
+        msg ~= marks;
+
+        return msg;
+    }
+
+    Message arg(char[] s)
+    {
+        if (args.length == 11)
+            throw new Exception("Sorry, errors only support up to 10 args");
+        args ~= s;
+        return this;
+    }
+
+    Message arg(char[][] s)
+    {
+        char[] res = s[0 .. $ - 1].join(", ");
+        if (s.length > 1)
+            res ~= " and ";
+        res ~= s[$ - 1];
+        return arg(res);
+    }
+
+    Message arg(char c)
+    {
+        return arg([c]);
+    }
+
+    Message fatal(ExitLevel exitlevel = ExitLevel.Normal)
+    {
+        msg_handler.checkErrors(exitlevel);
+        return this;
+    }
+
+    /*
+    Message loc(SLoc loc)
+    {
+        location = loc;
+        return this;
+    }
+    */
+
+    MessageType type;
+private:
+    char[][] args;
+    SLoc location;
+    SourceManager src_mgr;
+    MessageHandler msg_handler;
+}

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/basic/Messages.d	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,74 @@
+module basic.Messages;
+
+enum : uint
+{
+    // Lex
+    InvalidSymbol,
+    InvalidIlligaleType,
+    UnexpectedEOFBlock,
+    OnlyOneDotFloating,
+    OnlyOneEFloating,
+
+    // Parse
+    UnexpectedTokMulti,
+    UnexpectedTokSingle,
+    UnexpectedTok,
+    CaseValueMustBeInt,
+    UnexpectedBeginStmt,
+    UnexpectedTokType,
+    ExpectedIdAfterDot,
+    ExpectedExp,
+    ExpectedCastType,
+    InvalidDeclType,
+    InvalidType,
+    //   - imports/module
+    ExpectedIdAfterPackage,
+    RenameMustBeSingleIdent,
+
+
+    // Imports
+    CannotFindModule,
+}
+
+enum MessageType
+{
+    Warning,
+    Error,
+}
+
+MessageEntry[uint] Messages;
+
+struct MessageEntry
+{
+    MessageType type;
+    char[] message;
+}
+    
+private alias MessageType.Error Err;
+private alias MessageType.Warning War;
+private alias MessageEntry E;
+static this()
+{
+    Messages = [
+        UnexpectedEOFBlock  : E(Err, "Unexpected end of file. Unclosed comment block"),
+        InvalidSymbol       : E(Err, "Read invalid symbol: '%0'"),
+        OnlyOneDotFloating  : E(Err, "Only one '.' is allowed in an floating number"),
+        OnlyOneEFloating    : E(Err, "Only one E is allowed in an floating number"),
+
+        UnexpectedTokMulti  : E(Err, "Unexpected token, got %0 expected one of %1"),
+        UnexpectedTokSingle : E(Err, "Unexpected token, got %0 expected %1"),
+        UnexpectedTok       : E(Err, "Unexpected token %0"),
+        CaseValueMustBeInt  : E(Err, "Cases can only be integer literals"),
+        UnexpectedBeginStmt : E(Err, "Unexpected begining of statement."),
+        UnexpectedTokType   : E(Err, "Unexpected token in Type parsing. Got %0"),
+        ExpectedIdAfterDot  : E(Err, "Expected identifier after '.'"),
+        ExpectedExp         : E(Err, "Expected expression"),
+        ExpectedCastType    : E(Err, "Expected cast type"),
+        InvalidDeclType     : E(Err, "Invalid declaration type"),
+        InvalidType         : E(Err, "Invalid type"),
+        ExpectedIdAfterPackage : E(Err, "Identifier expected following package"),
+
+        CannotFindModule    : E(Err, "Cannot find module '%0'")
+    ];
+}
+

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/basic/SmallArray.d	Tue Aug 12 18:14:56 2008 +0200
@@ -0,0 +1,106 @@
+module basic.SmallArray;
+
+/**
+  This struct acts like a normal dynamic array, with one difference.
+  A size is given, which is how many elements are preallocated on the stack.
+
+  Example:
+  --------
+  SmallArray!(float, 4) array;
+  array ~= 1.0;
+  array ~= 2.0;
+  array ~= 3.0;
+  float[] three_floats = array[0 .. 3];
+  // The slice gives a reference to the stack, remember to .dup
+  array ~= 4.0;
+  // not using the heap yet, but after the next line all values will have been
+  // copied to the heap.
+  array ~= 5.0;
+  --------
+
+  Compared to a normal dynamic array there is 8 bytes overhead (on 32 bit cpus)
+  and ofcourse size * T.sizeof bytes for the stack allocated array.
+ */
+struct SmallArray(T, ubyte size = 8)
+{
+    T[] opSlice(size_t low, size_t high)
+    {
+        assert(high <= len && low <= high, "Array index out of range");
+        return ptr[low .. high];
+    }
+
+    T[] opSlice()
+    {
+        return ptr[0 .. len];
+    }
+    alias opSlice unsafe;
+
+    T[] safe()
+    {
+        if (len <= size)
+            return static_array[0 .. len].dup;
+        return array[0 .. len];
+    }
+
+    T[] opSliceAssign(T val, size_t low, size_t high)
+    {
+        assert(high <= len && low <= high, "Array index out of range");
+        return ptr[low .. high] = val;
+    }
+
+    T[] opSliceAssign(T val)
+    {
+        return ptr[0 .. len] = val;
+    }
+
+    T opIndex(size_t index)
+    {
+        assert(index < len, "Array index out of range");
+        return ptr[index];
+    }
+
+    T opIndexAssign(T val, size_t index)
+    {
+        assert(index < len, "Array index out of range");
+        return ptr[index] = val;
+    }
+
+    void opCatAssign(T val)
+    {
+        if (len < size)
+            static_array[len] = val;
+        else if (len == size)
+        {
+            T[] tmp = static_array[].dup;
+            array = tmp;
+            array ~= val;
+        }
+        else
+            array ~= val;
+
+        ++len;
+        if (len <= size)
+            ptr = static_array.ptr;
+        else
+            ptr = array.ptr;
+    }
+
+    size_t length() { return len; }
+
+    static SmallArray opCall()
+    {
+        SmallArray array;
+        array.ptr = array.static_array.ptr;
+        return array;
+    }
+
+private:
+    T* ptr;
+    size_t len;
+    union
+    {
+        T[] array;
+        T[size] static_array;
+    }
+}
+