some tweaks for demo on a Mac

This commit is contained in:
Kartik Agaram 2021-05-17 22:20:55 -07:00
parent 06e429cdaf
commit 2952a29960
1 changed files with 4 additions and 2 deletions

View File

@ -45,17 +45,18 @@ type cell {
} }
fn render screen: (addr screen), _self: (addr environment) { fn render screen: (addr screen), _self: (addr environment) {
clear-screen screen
var self/esi: (addr environment) <- copy _self var self/esi: (addr environment) <- copy _self
var zoom/eax: (addr int) <- get self, zoom var zoom/eax: (addr int) <- get self, zoom
compare *zoom, 0 compare *zoom, 0
{ {
break-if-!= break-if-!=
clear-screen screen
render0 screen, self render0 screen, self
} }
compare *zoom, 1 compare *zoom, 1
{ {
break-if-!= break-if-!=
clear-screen screen
render1 screen, self render1 screen, self
} }
compare *zoom, 4 compare *zoom, 4
@ -1003,7 +1004,8 @@ fn linger _self: (addr environment) {
var self/esi: (addr environment) <- copy _self var self/esi: (addr environment) <- copy _self
var i/ecx: int <- copy 0 var i/ecx: int <- copy 0
{ {
compare i, 0x10000000 compare i, 0x10000000 # Kartik's Linux with -enable-kvm
#? compare i, 0x8000000 # Kartik's Mac with -accel tcg
break-if->= break-if->=
i <- increment i <- increment
loop loop