今でもX680x0ユーザー全員集合 Part 63

746 ：ナイコンさん：2014/11/08(土) 20:38:24.80 .net

まあ、結構良い感じな気がする。

fibonacci:
　　　　moveml #8240,%sp@-
　　　　movel %sp@(16),%a2
　　　　moveq #0,%d2
　　　　lea fibonacci,%a3
.L4:
　　　　moveq #1,%d0
　　　　cmpl %a2,%d0
　　　　jcs .L7
　　　　movel %d2,%d0
　　　　addl %a2,%d0
　　　　moveml %sp@+,#3076
　　　　rts
.L7:
　　　　pea %a2@(-1)
　　　　jsr %a3@
　　　　addql #4,%sp
　　　　subql #2,%a2
　　　　addl %d0,%d2
　　　　jra .L4

古いバージョンではどういうコード吐いてたか確認してないので進歩してるかはわからん。