1
0
mirror of https://github.com/dschmenk/PLASMA.git synced 2024-10-18 22:24:28 +00:00

Make SIEVE JITable

This commit is contained in:
David Schmenk 2018-03-29 07:58:31 -07:00
parent 3968f82625
commit 148031d192
2 changed files with 25 additions and 21 deletions

View File

@ -11,6 +11,7 @@ def beep#0
putc(7)
end
def sieve#0
beep
//for iter = 1 to 10
flag = heapalloc(sizepl)
@ -31,6 +32,9 @@ beep
next
//next
beep
end
sieve
puti(count)
puts(" primes.\n")
done

View File

@ -59,7 +59,7 @@ word syscmdln
word = @execmod, @open, @close, @read, @write
byte perr
byte jitcount = 45
byte jitsize = 128
byte jitsize = 255
//
// Working input buffer overlayed with strings table
//