From 20cd6b3b5830b8ac65434fd39d937f607c20d70d Mon Sep 17 00:00:00 2001
From: azidar
Date: Mon, 4 May 2015 10:54:28 -0700
Subject: Fixed change where type of mux-ss was incorrect

---
 src/main/stanza/primop.stanza | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/main/stanza/primop.stanza b/src/main/stanza/primop.stanza
index 34dd0392..9d88a019 100644
--- a/src/main/stanza/primop.stanza
+++ b/src/main/stanza/primop.stanza
@@ -181,7 +181,7 @@ public defn lower-and-type-primop (e:DoPrim) -> DoPrim :
       NEQUAL-UU-OP      : DoPrim(op(e),args(e),consts(e),u())
       NEQUAL-SS-OP      : DoPrim(op(e),args(e),consts(e),u())
       MUX-OP           : 
-         DoPrim{_,args(e),consts(e),of-type(args(e)[0])} $
+         DoPrim{_,args(e),consts(e),of-type(args(e)[1])} $
             match(type(args(e)[1]),type(args(e)[2])) :
                (t1:UIntType, t2:UIntType) : MUX-UU-OP
                (t1:SIntType, t2:SIntType) : MUX-SS-OP
@@ -189,7 +189,7 @@ public defn lower-and-type-primop (e:DoPrim) -> DoPrim :
       MUX-UU-OP        : DoPrim(op(e),args(e),consts(e),u())
       MUX-SS-OP        : DoPrim(op(e),args(e),consts(e),s())
       PAD-OP           : 
-         DoPrim{_,args(e),consts(e),of-type(args(e)[0])} $
+         DoPrim{_,args(e),consts(e),of-type(args(e)[1])} $
             match(type(args(e)[0])) :
                (t1:UIntType) : PAD-U-OP
                (t1:SIntType) : PAD-S-OP
-- 
cgit v1.2.3