| 123456789101112131415161718192021222324252627 |
- function $test() {
- @start
- %x =w copy 3
- %n =w copy 2
- @loop
- %c =w ceqw %n, 10000
- jnz %c, @end, @next
- @next
- %t =w copy 3
- %x =w add %x, 2
- @tloop
- %s =w mul %t, %t
- %c =w csgtw %s, %x
- jnz %c, @prime, @test
- @test
- %r =w rem %x, %t
- jnz %r, @tnext, @loop
- @tnext
- %t =w add %t, 2
- jmp @tloop
- @prime
- %n =w add %n, 1
- jmp @loop
- @end
- storew %x, $a
- ret
- }
|
