Attempt two to fix PSP
authortwinaphex <libretro@gmail.com>
Fri, 18 Aug 2017 05:07:29 +0000 (07:07 +0200)
committertwinaphex <libretro@gmail.com>
Fri, 18 Aug 2017 05:07:29 +0000 (07:07 +0200)
pico/draw.c
pico/draw_amips.s

index bccb4d0..4c96a9a 100644 (file)
@@ -35,7 +35,8 @@ int (*PicoScanBegin)(unsigned int num) = NULL;
 int (*PicoScanEnd)  (unsigned int num) = NULL;\r
 \r
 static unsigned char DefHighCol[8+320+8];\r
 int (*PicoScanEnd)  (unsigned int num) = NULL;\r
 \r
 static unsigned char DefHighCol[8+320+8];\r
-unsigned char *HighColBase = DefHighCol;\r
+unsigned char *HighCol = DefHighCol;\r
+static unsigned char *HighColBase = DefHighCol;\r
 static int HighColIncrement;\r
 \r
 static unsigned int DefOutBuff[320*2/2];\r
 static int HighColIncrement;\r
 \r
 static unsigned int DefOutBuff[320*2/2];\r
index 0fa729e..fa7906e 100644 (file)
@@ -117,11 +117,11 @@ amips_clut_loop6:
 .macro TileEndCode
     xori    $t8, $t9, 0xff
     beqz    $t8, tile11111111            # common case
 .macro TileEndCode
     xori    $t8, $t9, 0xff
     beqz    $t8, tile11111111            # common case
-    lui     $v1, %hi(HighColBase)
+    lui     $v1, %hi(HighCol)
     lui     $t8, %hi(TileTable)
     ins     $t8, $t9, 2, 8
     lw      $t8, %lo(TileTable)($t8)
     lui     $t8, %hi(TileTable)
     ins     $t8, $t9, 2, 8
     lw      $t8, %lo(TileTable)($t8)
-    lw      $v1, %lo(HighColBase)($v1)
+    lw      $v1, %lo(HighCol)($v1)
     jr      $t8
     addu    $a0, $v1
 .endm
     jr      $t8
     addu    $a0, $v1
 .endm
@@ -158,8 +158,8 @@ TileFlip:
 
 
 SingleColor:
 
 
 SingleColor:
-    lui     $t9, %hi(HighColBase)
-    lw      $t9, %lo(HighColBase)($t9)
+    lui     $t9, %hi(HighCol)
+    lw      $t9, %lo(HighCol)($t9)
     andi    $t0, $a1, 0xf
     or      $t0, $t0, $a2
     addu    $a0, $t9
     andi    $t0, $a1, 0xf
     or      $t0, $t0, $a2
     addu    $a0, $t9
@@ -178,7 +178,7 @@ TileEmpty:
     or      $v0, $0, 1                   # empty tile
 
 tile11111111:
     or      $v0, $0, 1                   # empty tile
 
 tile11111111:
-    lw      $v1, %lo(HighColBase)($v1)
+    lw      $v1, %lo(HighCol)($v1)
     or      $t0, $t0, $a2
     addu    $a0, $v1
     sb      $t0, 0($a0)
     or      $t0, $t0, $a2
     addu    $a0, $v1
     sb      $t0, 0($a0)