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:
parent
3968f82625
commit
148031d192
@ -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
|
||||
|
@ -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
|
||||
//
|
||||
|
Loading…
Reference in New Issue
Block a user