dot-loop ( n -- result )


Vocabulary
benchmark.neon

Inputs
nan object


Outputs
resultan object


Definition


: dot-loop ( n -- result )
0 int-4-with swap [
char-16{ 1 2 3 4 5 6 7 8 1 2 3 4 5 6 7 8 }
char-16{ 8 7 6 5 4 3 2 1 8 7 6 5 4 3 2 1 } rot vdot4+
] times ;