From: Kenn Humborg (kenn at domain bluetree.ie)
Date: Fri 29 Oct 1999 - 11:22:52 IST
> Now all we need is an APL version, and perhaps one or
> two obscure assembler versions. VAX assembler anyone?
> Cray assembler maybe?
Dammit, but I tried to stop myself...
factorial:
.mask ^<r5>
movl (ap), r0
cmpl #1, r0
beq done
movl r0, r5
decl r0
pushl r0
calls #1, factorial
mul2 r5, r0
done:
ret
fact_test:
.mask ^<>
pushl #30
calls #1, factorial
; result in r0
Now where's my Cray assembler reference...
Later,
Kenn
This archive was generated by hypermail 2.1.6 : Thu 06 Feb 2003 - 13:04:48 GMT