graphics: image bayer dithering; movie test using image decoding of tsvm's gpu

.gitignore

@@ -53,3 +53,4 @@ tsvmman.pdf
 *.toc
 
 assets/disk0/home/basic/*
+assets/disk0/movtestimg/*.jpg

assets/disk0/home/jpdectest.js

@@ -20,7 +20,7 @@ println(`dim: ${imgw}x${imgh}`)
 println(`converting to displayable format...`)
 
 // convert colour
-graphics.imageToDisplayableFormat(imageData, -1048577, imgw, imgh, 4, true)
+graphics.imageToDisplayableFormat(imageData, -1048577, imgw, imgh, 4, 2)
 
 sys.free(imageData)
 sys.free(infile)

assets/disk0/movtest.js

@@ -0,0 +1,20 @@
+
+let infile = sys.malloc(752704)
+let imagearea = sys.malloc(560*448*3)
+
+con.clear()
+
+for (let f = 1; f <= 52; f++) {
+    let fname = `/movtestimg/${(''+f).padStart(3,'0')}.jpg`
+    filesystem.open("A", fname, "R")
+    let fileLen = filesystem.getFileLen("A")
+    dma.comToRam(0, 0, infile, fileLen)
+
+    graphics.decodeImageTo(infile, fileLen, imagearea)
+
+    graphics.imageToDisplayableFormat(imagearea, -1048577, 560, 448, 3, 2)
+
+}
+
+sys.free(imagearea)
+sys.free(infile)

tsvm_core/src/net/torvald/tsvm/UnsafePtr.kt

@@ -73,8 +73,8 @@ internal class UnsafePtr(pointer: Long, allocSize: Long) {
 
     fun destroy() {
         if (!destroyed) {
-            println("[UnsafePtr] Destroying pointer $this; called from:")
-            printStackTrace(this)
+//            println("[UnsafePtr] Destroying pointer $this; called from:")
+//            printStackTrace(this)
 
             UnsafeHelper.unsafe.freeMemory(ptr)
 
@@ -88,7 +88,7 @@ internal class UnsafePtr(pointer: Long, allocSize: Long) {
         //// appear (e.g. getting garbage values when it fucking shouldn't)
 
         assert(!destroyed) { throw NullPointerException("The pointer is already destroyed ($this)") }
-        if (index !in 0 until size) throw IndexOutOfBoundsException("Index: $index; alloc size: $size")
+        if (index !in 0 until size) throw IndexOutOfBoundsException("Index: $index; alloc size: $size; pointer: ${this}\n${Thread.currentThread().stackTrace.joinToString("\n", limit=10) { "    $it" }}")
     }
 
     operator fun get(index: Long): Byte {