From 63ab87644121dccf67fbd17fd866e92f2c44256d Mon Sep 17 00:00:00 2001
From: David Capello <david@igarastudio.com>
Date: Wed, 24 Apr 2019 19:09:21 -0300
Subject: [PATCH] Add tests for app.defaultPalette and Palette{ fromResource }

---
 scripts/palette.lua | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)

diff --git a/scripts/palette.lua b/scripts/palette.lua
index 51ce874b2..9a65b451a 100644
--- a/scripts/palette.lua
+++ b/scripts/palette.lua
@@ -49,3 +49,33 @@ do
     assert(p:getColor(i) == q:getColor(i))
   end
 end
+
+-- Default palette and resources
+do
+  local db16 = Palette{ fromResource="DB16" }
+  local db32 = Palette{ fromResource="DB32" }
+
+  assert(#db16 == 16)
+  assert(#db32 == 32)
+  assert(db32:getColor(0) == Color(0, 0, 0))
+  assert(db32:getColor(31) == Color(138, 111, 48))
+
+  assert(app.defaultPalette == db32)
+
+  app.defaultPalette = db16
+  assert(app.defaultPalette == db16)
+
+  -- Default sprite palette is completely black
+  -- TODO should we use the app.defaultPalette as the default palette?
+  local spr = Sprite(32, 32, ColorMode.INDEXED)
+  local sprPal = spr.palettes[1];
+  assert(#sprPal == 256)
+  assert(sprPal ~= db16)
+  assert(sprPal ~= db32)
+  for i=0,255 do
+    assert(sprPal:getColor(i) == Color(0, 0,0))
+  end
+
+  spr:setPalette(db32)
+  assert(sprPal == db32)
+end