diff gen/elem.cpp @ 86:fd32135dca3e trunk

[svn r90] Major updates to the gen directory. Redesigned the 'elem' struct. Much more... !!! Lots of bugfixes. Added support for special foreach on strings. Added std.array, std.utf, std.ctype and std.uni to phobos. Changed all the .c files in the gen dir to .cpp (it *is* C++ after all)
author lindquist
date Sat, 03 Nov 2007 14:44:58 +0100
parents gen/elem.c@339422268de1
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/gen/elem.cpp	Sat Nov 03 14:44:58 2007 +0100
@@ -0,0 +1,85 @@
+/*
+#include <iostream>
+
+#include "gen/llvm.h"
+
+#include "gen/elem.h"
+#include "gen/irstate.h"
+#include "gen/logger.h"
+#include "gen/dvalue.h"
+
+//////////////////////////////////////////////////////////////////////////////////////////
+
+elem::elem(Expression* e)
+{
+    exp = e;
+
+    mem = 0;
+    val = 0;
+    arg = 0;
+
+    type = NONE;
+    inplace = false;
+    field = false;
+    callconv = (unsigned)-1;
+    isthis = false;
+    istypeinfo = false;
+    temp = false;
+
+    vardecl = 0;
+    funcdecl = 0;
+
+    dvalue = 0;
+}
+
+elem::~elem()
+{
+    delete dvalue;
+}
+
+llvm::Value* elem::getValue()
+{
+    if (dvalue && !dvalue->isSlice()) {
+        Logger::println("HAS DVALUE");
+        return dvalue->getRVal();
+    }
+
+    assert(val || mem);
+    switch(type)
+    {
+    case NONE:
+        assert(0 && "type == NONE");
+        break;
+
+    case VAR:
+    case REF:
+    case ARRAYLEN:
+        if (val) {
+            return val;
+        }
+        else {
+            if (!llvm::isa<llvm::PointerType>(mem->getType()))
+            {
+                Logger::cout() << "unexpected type: " << *mem->getType() << '\n';
+                assert(0);
+            }
+            const llvm::PointerType* pt = llvm::cast<llvm::PointerType>(mem->getType());
+            if (!pt->getElementType()->isFirstClassType()) {
+                return mem;
+            }
+            else {
+                return gIR->ir->CreateLoad(mem, "tmp");
+            }
+        }
+
+    case VAL:
+    case NUL:
+    case FUNC:
+    case CONST:
+    case SLICE:
+        return val ? val : mem;
+    }
+    assert(0 && "type == invalid value");
+    return 0;
+}
+*/