Mercurial > projects > dang
view ast/Decl.d @ 136:2be29b296081
Lots of changes:
- Parsing classes and interfaces
- Fixed some seg faults in sema
- Supporting "private" to some extend
- And a lot of other small fixes
author | johnsen@johnsen-laptop |
---|---|
date | Fri, 11 Jul 2008 21:47:57 +0200 |
parents | ed815b31479b |
children | 6e6355fb5f0f |
line wrap: on
line source
module ast.Decl; import ast.Exp, ast.Stmt; import lexer.Token; import tango.io.Stdout; import sema.Scope, sema.Symbol, sema.DType, basic.SmallArray, basic.Attribute; enum DeclType { VarDecl, DummyDecl, ImportDecl, FuncDecl, StructDecl, } class Decl { this(DeclType declType) { this.declType = declType; } void simplify() { } DType type() { if (sym !is null) return sym.type; return null; } Identifier getIdentifier() { switch(declType) { case DeclType.VarDecl: return (cast(VarDecl)this).identifier; case DeclType.FuncDecl: return (cast(FuncDecl)this).identifier; default: assert(0, "Invalid DeclType for getting a identifier"); } } DeclType declType; Scope env; Symbol sym; Attribute att; } class DummyDecl : Decl { this() { super(DeclType.DummyDecl); } } class VarDecl : Decl { this(Identifier type, Identifier identifier, Exp e = null) { super(DeclType.VarDecl); this.varType = type; this.identifier = identifier; this.init = e; } void simplify() { } override DType type() { return env.findType(varType); } Identifier varType, identifier; Exp init; } class ImportDecl : Decl { this() { super(DeclType.ImportDecl); } char[] get() { char[] res; foreach(i ; packages) res ~= i.get ~ "."; res ~= name.get; return res; } bool isStatic = false; Identifier[] packages; Identifier name; Identifier aliasedName; Identifier[2][] explicitSymbols; } class FuncDecl : Decl { this(Identifier type, Identifier identifier) { super(DeclType.FuncDecl); this.returnType = type; this.identifier = identifier; } void addParam(Identifier type, Identifier name = null) { funcArgs ~= new VarDecl(type, name, null); } void setBody(CompoundStatement stmts) { statements = stmts.statements; emptyFunction = false; } void simplify() { /* if(auto t = env.find(identifier).type.asFunction()) { if(auto s = cast(DStruct)t.returnType) { VarDecl[] funcArgs; auto i = new Identifier("ret.val"); i.env = env; i.env.add(i); i.env.find(i).setType( s ); auto var = new VarDecl(returnType, i); var.env = env; funcArgs ~= var; funcArgs ~= this.funcArgs; this.funcArgs = funcArgs; t.returnType = DType.Void; this.returnType = new Identifier("void"); env.find(identifier).setType(t); sret = true; myType = null; } } */ foreach (funcArg; funcArgs) funcArg.simplify(); foreach (stmt; statements) stmt.simplify(); } override DFunction type() { if (myType !is null) return myType; auto t = new DFunction(identifier); t.returnType = env.findType(returnType); SmallArray!(DType) array; foreach (a; funcArgs) array ~= a.type(); t.params = array.safe(); t.firstParamIsReturnValue = this.sret; myType = t; return myType; } Identifier returnType, identifier; VarDecl[] funcArgs; Stmt[] statements; bool sret = false; bool emptyFunction = true; private DFunction myType; } class StructDecl : Decl { this(Identifier identifier) { super(DeclType.StructDecl); this.identifier = identifier; } void addMember(Decl decl) { decls ~= decl; } void simplify() { } override DType type() { return env.findType(identifier); } Identifier identifier; Decl[] decls; private DType myType; }