(no commit message)
[libreriscv.git] / simple_v_extension / daxpy_example.mdwn
index 3e26b25d4b18a41c6d01bd20760b9cca015d1ba0..b48bae362a915b9afb1995fb68a3fca205e47079 100644 (file)
@@ -6,18 +6,36 @@
      }
     }
 
+    # SV Version
     # a0 is n, a1 is ptr to x[0], a2 is ptr to y[0], fa0 is a (scalar)
-     VBLK.REG[0] = {type: F, isvec: 1, regkey: a3, regidx: a3, elwidth: dflt}
-     VBLK.REG[1] = {type: F, isvec: 1, regkey: a7, regidx: a7, elwidth: dflt}
-     VBLK.MVL = 4
+      VBLK.REG[0] = {type: F, isvec: 1, regkey: a3, regidx: a3, elwidth: dflt}
+      VBLK.REG[1] = {type: F, isvec: 1, regkey: a7, regidx: a7, elwidth: dflt}
     loop:
-     setvl  t0, a0          # vl = t0 = min(a0, MVL))
-     ld     a3, a1          # load 4 registers a3-6 from x
-     slli   t1, t0, 3       # t1 = vl * 8 (in bytes)
-     ld     a7, a2          # load 4 registers a7-10 from y
-     add    a1, a1, t1      # increment pointer to x by vl*8
-     fmadd  a7, a3, fa0, a7 # v1 += v0 * fa0 (y = a * x + y)
-     sub    a0, a0, t0      # n -= vl (t0)
-     st     a7, a2          # store 4 registers a7-10 to y
-     add    a2, a2, t1      # increment pointer to y by vl*8
-     bnez   a0, loop        # repeat if n != 0
+      VBLK.SETVL  t0, a0, #4   # MVL=4, vl = t0 = min(a0, MVL))
+      c.ld     a3, a1          # load 4 registers a3-6 from x
+      c.slli   t1, t0, 3       # t1 = vl * 8 (in bytes: FP is double)
+      c.ld     a7, a2          # load 4 registers a7-10 from y
+      c.add    a1, a1, t1      # increment pointer to x by vl*8
+      fmadd  a7, a3, fa0, a7   # v1 += v0 * fa0 (y = a * x + y)
+      c.sub    a0, a0, t0      # n -= vl (t0)
+      c.st     a7, a2          # store 4 registers a7-10 to y
+      c.add    a2, a2, t1      # increment pointer to y by vl*8
+      c.bnez   a0, loop        # repeat if n != 0
+      c.ret                    # return
+
+    # RVV version
+    # a0 is n, a1 is pointer to x[0], a2 is pointer to y[0], fa0 is a
+      li t0, 2<<25
+      vsetdcfg t0             # enable 2 64b Fl.Pt. registers
+    loop:
+      setvl  t0, a0           # vl = t0 = min(mvl, n)
+      vld    v0, a1           # load vector x
+      c.slli   t1, t0, 3      # t1 = vl * 8 (in bytes)
+      vld    v1, a2           # load vector y
+      c.add    a1, a1, t1     # increment pointer to x by vl*8
+      vfmadd v1, v0, fa0, v1  # v1 += v0 * fa0 (y = a * x + y)
+      c.sub    a0, a0, t0     # n -= vl (t0)
+      vst    v1, a2           # store Y
+      c.add    a2, a2, t1     # increment pointer to y by vl*8
+      c.bnez   a0, loop       # repeat if n != 0
+      c.ret                   # return