FIX: image's alpha channel not right

.github/workflows/main.yml

@@ -14,10 +14,8 @@ jobs:
         $url = "http://static.red-lang.org/build/rebview.exe"
         $output = "$Env:GITHUB_WORKSPACE\rebview.exe"
         (New-Object System.Net.WebClient).DownloadFile($url, $output)
-    - name: run view test
-      run: |
-        rebview.exe -qws tests\run-core-tests.r --batch
-        rebview.exe -qws system\tests\run-all.r --batch
+    - name: run core test
+      run: rebview.exe -qws tests\run-core-tests.r --batch
       shell: cmd
 
     - uses: actions/upload-artifact@v1
@@ -26,6 +24,27 @@ jobs:
         name: core-test-log
         path: quick-test/quick-test.log
 
+  Core-Debug:
+
+    runs-on: windows-latest
+
+    steps:
+    - uses: actions/checkout@v1
+    - name: setup red repo
+      run: |
+        $url = "http://static.red-lang.org/build/rebview.exe"
+        $output = "$Env:GITHUB_WORKSPACE\rebview.exe"
+        (New-Object System.Net.WebClient).DownloadFile($url, $output)
+    - name: run core test
+      run: rebview.exe -qws tests\run-core-tests.r --batch --debug
+      shell: cmd
+
+    - uses: actions/upload-artifact@v1
+      if: failure()
+      with:
+        name: core-debug-test-log
+        path: quick-test/quick-test.log
+
   View:
 
     runs-on: windows-latest
@@ -79,14 +98,54 @@ jobs:
         $url = "http://static.red-lang.org/build/rebview.exe"
         $output = "$Env:GITHUB_WORKSPACE\rebview.exe"
         (New-Object System.Net.WebClient).DownloadFile($url, $output)
-    - name: run view test
-      run: |
-        rebview.exe -qws tests\run-all.r --each
-        rebview.exe -qws system\tests\run-all.r --each
+    - name: run each test
+      run: rebview.exe -qws tests\run-core-tests.r --ci-each
       shell: cmd
 
     - uses: actions/upload-artifact@v1
       if: failure()
       with:
         name: each-test-log
         path: quick-test/quick-test.log
+
+  Each-Mode-Debug:
+
+    runs-on: windows-latest
+
+    steps:
+    - uses: actions/checkout@v1
+    - name: setup red repo
+      run: |
+        $url = "http://static.red-lang.org/build/rebview.exe"
+        $output = "$Env:GITHUB_WORKSPACE\rebview.exe"
+        (New-Object System.Net.WebClient).DownloadFile($url, $output)
+    - name: run each test
+      run: rebview.exe -qws tests\run-core-tests.r --ci-each --debug
+      shell: cmd
+
+    - uses: actions/upload-artifact@v1
+      if: failure()
+      with:
+        name: each-debug-test-log
+        path: quick-test/quick-test.log
+
+  Red-System-Test:
+
+    runs-on: windows-latest
+
+    steps:
+    - uses: actions/checkout@v1
+    - name: setup red repo
+      run: |
+        $url = "http://static.red-lang.org/build/rebview.exe"
+        $output = "$Env:GITHUB_WORKSPACE\rebview.exe"
+        (New-Object System.Net.WebClient).DownloadFile($url, $output)
+    - name: run Red/System test
+      run: rebview.exe -qws system\tests\run-all.r --batch
+      shell: cmd
+
+    - uses: actions/upload-artifact@v1
+      if: failure()
+      with:
+        name: rs-test-log
+        path: quick-test/quick-test.log

.travis.yml

@@ -30,8 +30,10 @@ env:
 
 
 matrix:
-#   allow_failures:               # Enable to disregard ARM build failures
-#   - env: OS=arm                 # Enable to disregard ARM build failures
+  allow_failures:               # Enable to disregard ARM build failures
+  - env: OS=armel               # Enable to disregard ARMel build failures
+  - env: OS=armhf               # Enable to disregard ARMhf build failures
+
   include:
 
 
@@ -62,7 +64,7 @@ matrix:
       --entrypoint /red/quick-test/runnable/arm-tests/red/run-all.sh
       balenalib/armv5e-debian:latest
     - >
-      docker run -v ${PWD}:/red
+      travis_wait 15 docker run -v ${PWD}:/red
       -e LD_LIBRARY_PATH='$LD_LIBRARY_PATH:/red/quick-test/runnable/arm-tests/system/'
       -w /red/quick-test/runnable/arm-tests/system/
       --entrypoint /red/quick-test/runnable/arm-tests/system/run-all.sh
@@ -81,7 +83,7 @@ matrix:
       --entrypoint /red/quick-test/runnable/arm-tests/red/run-all.sh
       balenalib/raspberry-pi2-debian:latest
     - >
-      docker run -v ${PWD}:/red
+      travis_wait 15 docker run -v ${PWD}:/red
       -e LD_LIBRARY_PATH='$LD_LIBRARY_PATH:/red/quick-test/runnable/arm-tests/system/'
       -w /red/quick-test/runnable/arm-tests/system/
       --entrypoint /red/quick-test/runnable/arm-tests/system/run-all.sh

boot.red

@@ -18,19 +18,18 @@ Red [
 	#include %environment/routines.red
 	#include %environment/scalars.red
 	#include %environment/colors.red
+
+	#register-intrinsics
 	#include %environment/functions.red
 	#include %environment/system.red
-	#include %environment/lexer.red
 	#include %environment/operators.red
 
-	#register-intrinsics
-
-	#include %environment/codecs/png.red
-	#include %environment/codecs/jpeg.red
-	#include %environment/codecs/bmp.red
-	#include %environment/codecs/gif.red
-	#include %environment/codecs/json.red
-	#include %environment/codecs/csv.red
+	#include %environment/codecs/PNG.red
+	#include %environment/codecs/JPEG.red
+	#include %environment/codecs/BMP.red
+	#include %environment/codecs/GIF.red
+	#include %environment/codecs/JSON.red
+	#include %environment/codecs/CSV.red
 
 	#include %environment/reactivity.red				;-- requires SET intrinsic
 	#include %environment/networking.red

build/includes.r

@@ -25,7 +25,6 @@ write %build/bin/sources.r set-cache [
 		;%css-colors.red
 		%datatypes.red
 		%functions.red
-		%lexer.red
 		%natives.red
 		%networking.red
 		%operators.red
@@ -34,12 +33,12 @@ write %build/bin/sources.r set-cache [
 		%scalars.red
 		%system.red
 		%codecs/ [
-			%bmp.red
-			%gif.red
-			%jpeg.red
-			%png.red
-			%csv.red
-			%json.red
+			%BMP.red
+			%GIF.red
+			%JPEG.red
+			%PNG.red
+			%CSV.red
+			%JSON.red
 		]
 		%console/ [
 			%auto-complete.red
@@ -85,6 +84,8 @@ write %build/bin/sources.r set-cache [
 		%dtoa.reds
 		%hashtable.reds
 		%interpreter.reds
+		%lexer.reds
+		%lexer-transitions.reds
 		%macros.reds
 		%natives.reds
 		%ownership.reds
@@ -101,8 +102,6 @@ write %build/bin/sources.r set-cache [
 		%tools.reds
 		%unicode.reds
 		%utils.reds
-		%image-utils.reds
-		%vector2d.reds
 		%datatypes/ [
 			%action.reds
 			%block.reds
@@ -112,6 +111,7 @@ write %build/bin/sources.r set-cache [
 			%common.reds
 			%context.reds
 			%datatype.reds
+			%date.reds
 			%email.reds
 			%error.reds
 			%event.reds
@@ -120,14 +120,17 @@ write %build/bin/sources.r set-cache [
 			%function.reds
 			%get-path.reds
 			%get-word.reds
+			%handle.reds
 			%hash.reds
 			%image.reds
+			%image-utils.reds
 			%integer.reds
 			%issue.reds
 			%lit-path.reds
 			%lit-word.reds
 			%logic.reds
 			%map.reds
+			%money.reds
 			%native.reds
 			%none.reds
 			%op.reds
@@ -138,6 +141,7 @@ write %build/bin/sources.r set-cache [
 			%percent.reds
 			%point.reds
 			%port.reds
+			%ref.reds
 			%refinement.reds
 			%routine.reds
 			%series.reds
@@ -153,9 +157,8 @@ write %build/bin/sources.r set-cache [
 			%unset.reds
 			%url.reds
 			%vector.reds
+			%vector2d.reds
 			%word.reds
-			%handle.reds
-			%date.reds
 		]
 		%platform/ [
 			%android.reds
@@ -228,6 +231,8 @@ write %build/bin/sources.r set-cache [
 					%comdlgs.reds
 					%draw.reds
 					%events.reds
+					%css.reds
+					%color.reds
 					%font.reds
 					%gtk.reds
 					%gui.reds