aboutsummaryrefslogtreecommitdiff
path: root/src/main/stanza/primop.stanza
diff options
context:
space:
mode:
Diffstat (limited to 'src/main/stanza/primop.stanza')
-rw-r--r--src/main/stanza/primop.stanza18
1 files changed, 15 insertions, 3 deletions
diff --git a/src/main/stanza/primop.stanza b/src/main/stanza/primop.stanza
index 6c43c494..2a2d75f2 100644
--- a/src/main/stanza/primop.stanza
+++ b/src/main/stanza/primop.stanza
@@ -146,9 +146,21 @@ public defn set-primop-type (e:DoPrim) -> DoPrim :
(t1:SIntType) : SIntType(w1())
(t1) : UnknownType()
BIT-NOT-OP : DoPrim(o,a,c,t1())
- BIT-AND-OP : DoPrim(o,a,c,UIntType(MAX(w1(),w2())))
- BIT-OR-OP : DoPrim(o,a,c,UIntType(MAX(w1(),w2())))
- BIT-XOR-OP : DoPrim(o,a,c,UIntType(MAX(w1(),w2())))
+ BIT-AND-OP : DoPrim{o,a,c,_} $
+ match(t1()) :
+ (t1:UIntType) : UIntType(MAX(w1(),w2()))
+ (t1:SIntType) : SIntType(MAX(w1(),w2()))
+ (t1) : UnknownType()
+ BIT-OR-OP : DoPrim{o,a,c,_} $
+ match(t1()) :
+ (t1:UIntType) : UIntType(MAX(w1(),w2()))
+ (t1:SIntType) : SIntType(MAX(w1(),w2()))
+ (t1) : UnknownType()
+ BIT-XOR-OP : DoPrim{o,a,c,_} $
+ match(t1()) :
+ (t1:UIntType) : UIntType(MAX(w1(),w2()))
+ (t1:SIntType) : SIntType(MAX(w1(),w2()))
+ (t1) : UnknownType()
BIT-AND-REDUCE-OP : DoPrim(o,a,c,BoolType())
BIT-OR-REDUCE-OP : DoPrim(o,a,c,BoolType())
BIT-XOR-REDUCE-OP : DoPrim(o,a,c,BoolType())