Added handling of new expression opcodes.

git-svn-id: svn://svn.cc65.org/cc65/trunk@5411 b7a2c559-68d2-44c3-8de9-860c34a00d81
2012-01-19 11:55:36 +00:00
parent 75b83260c6
commit 772d51aa5e
2 changed files with 14 additions and 5 deletions
--- a/src/ld65/expr.c
+++ b/src/ld65/expr.c
@@ -408,6 +408,12 @@ long GetExprVal (ExprNode* Expr)

       	case EXPR_WORD1:
 	    return (GetExprVal (Expr->Left) >> 16) & 0xFFFF;
+             
+        case EXPR_FARADDR:
+            return GetExprVal (Expr->Left) & 0xFFFFFF;
+
+        case EXPR_DWORD:
+            return GetExprVal (Expr->Left) & 0xFFFFFFFF;

        default:
       	    Internal ("Unknown expression Op type: %u", Expr->Op);