Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Dot product

Single precision floating point.
System V AMD64 ABI convention.



sses_dot:

    movaps xmm0, [rdi]

    mulps xmm0, [rsi]

    haddps xmm0, xmm0

    haddps xmm0, xmm0

    ret

>>11

(define (do-product v w)

 (foldl (λ (x y r) (+ (* x y) r)) 0 v w))

Newer Posts