[#24] New language: Red

backend/src/langs.ts

@@ -2814,6 +2814,19 @@ end
 123 * 234`,
     template: `REBOL [Title: "Main"]
 print "Hello, world!"
+`,
+  },
+  red: {
+    name: "Red",
+    setup: "cp -R /opt/red/template .red",
+    repl: "/usr/local/bin/red",
+    input: `DELAY: 1
+123 * 234`,
+    main: "main.red",
+    run: "/usr/local/bin/red main.red; /usr/local/bin/red",
+    template: `Red [Title: "Main"]
+
+print "Hello, world!"
 `,
   },
   redis: {

scripts/docker-install-phase3c.bash

@@ -122,6 +122,9 @@ ratfor
 # rc
 rc
 
+# Red
+libcurl4:i386
+
 # Redis
 redis
 

scripts/docker-install-phase4.bash

@@ -305,6 +305,12 @@ tar -xf rebol-core-*.tar.gz
 mv rebol-core/rebol /usr/local/bin/
 rm -rf rebol-core rebol-core-*.tar.gz
 
+# Red
+path="$(curl -sSL https://static.red-lang.org/download.html | grep -Eo '/dl/linux/[^"]+' | head -n1)"
+wget -nv "https://static.red-lang.org/${path}" -O /usr/local/bin/red
+chmod +x /usr/local/bin/red
+rm red-latest.zip
+
 # Rust
 export CARGO_HOME=/opt/rust
 export RUSTUP_HOME=/opt/rust

scripts/docker-install-phase7.bash

@@ -71,6 +71,11 @@ cat bsconfig.json | jq '.name = "riju-project"' | sponge bsconfig.json
 yarn install
 popd >/dev/null
 
+# Red
+sudo -u build /usr/local/bin/red <<< quit
+mkdir /opt/red
+mv /home/build/.red /opt/red/template
+
 # Unison
 mkdir -p /opt/unison/project-template
 pushd /opt/unison/project-template >/dev/null