summaryrefslogtreecommitdiff
path: root/src/Helium/Instructions/Instances/Barrett.agda
diff options
context:
space:
mode:
authorGreg Brown <greg.brown@cl.cam.ac.uk>2022-02-17 16:34:54 +0000
committerGreg Brown <greg.brown@cl.cam.ac.uk>2022-02-17 16:34:54 +0000
commit60b201d0c8752b84194753bb72eee777bf245fe3 (patch)
tree59a7eb2e8189ee84e7664dc1e562e88bbb09bac1 /src/Helium/Instructions/Instances/Barrett.agda
parent273b6354ea17be93a0dfe4f50cd047b328762b02 (diff)
Make call and invoke take All instead of tuple.
Diffstat (limited to 'src/Helium/Instructions/Instances/Barrett.agda')
-rw-r--r--src/Helium/Instructions/Instances/Barrett.agda4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Helium/Instructions/Instances/Barrett.agda b/src/Helium/Instructions/Instances/Barrett.agda
index 5ec9ba4..606a9e9 100644
--- a/src/Helium/Instructions/Instances/Barrett.agda
+++ b/src/Helium/Instructions/Instances/Barrett.agda
@@ -25,9 +25,9 @@ open import Helium.Instructions.Core
barret : (m -n : Expression [] (bits 32)) (t z : VecReg) (im : GenReg) → Procedure []
barret m -n t z im =
index R (lit (im ′f)) ≔ m ∙
- invoke vqrdmulh-s32,t,z,m (tup []) ∙
+ invoke vqrdmulh-s32,t,z,m [] ∙
index R (lit (im ′f)) ≔ -n ∙
- invoke vmla-s32,z,t,-n (tup []) ∙end
+ invoke vmla-s32,z,t,-n [] ∙end
where
vqrdmulh-s32,t,z,m =
ExecBeats (vqrdmulh (record