vm: fix load_raw, fix rng bug in textelite (carry flag shifting...)

irmen · irmen · commit fe2b67998cd9 · 2024-03-17T16:46:26.000+01:00
diff --git a/compiler/res/prog8lib/virtual/diskio.p8 b/compiler/res/prog8lib/virtual/diskio.p8
@@ -189,7 +189,7 @@ diskio {
     sub load_raw(uword filenameptr, uword start_address) -> uword {
         %ir {{
             loadm.w r65534,diskio.load_raw.filenameptr
-            loadm.w r65535,diskio.load_raw.address_override
+            loadm.w r65535,diskio.load_raw.start_address
             syscall 57 (r65534.w, r65535.w): r0.w
             returnr.w r0
         }}
diff --git a/docs/source/todo.rst b/docs/source/todo.rst
@@ -1,8 +1,6 @@
 TODO
 ====
 
-vm textelite: after 1 galaxy jump:  galaxy maps shows wrong planet name until you redraw them a second time. Current planet name changes when showing maps and asking planet i)nfo!
-
 ...
 
 
diff --git a/examples/textelite.p8 b/examples/textelite.p8
@@ -692,7 +692,7 @@ galaxy {
     sub twist(uword x) -> uword {
         ubyte xh = msb(x)
         ubyte xl = lsb(x)
-        rol(xh)
+        xh <<= 1        ; make sure carry flag is not used on first shift!
         rol(xl)
         return mkword(xh, xl)
     }
diff --git a/gradle.properties b/gradle.properties
@@ -5,4 +5,4 @@ org.gradle.daemon=true
 kotlin.code.style=official
 javaVersion=11
 kotlinVersion=1.9.22
-version=10.2-SNAPSHOT
+version=10.2

-Original file line number
+Diff line change
@@ @@ -1,8 +1,6 @@ @@
 TODO
 ====
 -vm textelite: after 1 galaxy jump:  galaxy maps shows wrong planet name until you redraw them a second time. Current planet name changes when showing maps and asking planet i)nfo!
+-
 ...
Original file line number	Diff line number	Diff line change
`@@ -692,7 +692,7 @@ galaxy {`
`692`	`692`	`sub twist(uword x) -> uword {`
`693`	`693`	`ubyte xh = msb(x)`
`694`	`694`	`ubyte xl = lsb(x)`
`695`		`- rol(xh)`
	`695`	`+ xh <<= 1 ; make sure carry flag is not used on first shift!`
`696`	`696`	`rol(xl)`
`697`	`697`	`return mkword(xh, xl)`
`698`	`698`	`}`