--- a/gen/complex.cpp	Mon May 05 07:36:29 2008 +0200
+++ b/gen/complex.cpp	Mon May 05 20:28:59 2008 +0200
@@ -282,6 +282,24 @@
 
 //////////////////////////////////////////////////////////////////////////////////////////
 
+DValue* DtoComplexNeg(Type* type, DValue* val)
+{
+    val = DtoComplex(type, val);
+
+    llvm::Value *a, *b, *re, *im;
+
+    // values
+    DtoGetComplexParts(val, a, b);
+
+    // sub up
+    re = gIR->ir->CreateNeg(a, "tmp");
+    im = gIR->ir->CreateNeg(b, "tmp");
+
+    return new DComplexValue(type, re, im);
+}
+
+//////////////////////////////////////////////////////////////////////////////////////////
+
 llvm::Value* DtoComplexEquals(TOK op, DValue* lhs, DValue* rhs)
 {
     Type* type = lhs->getType();