New language: Beatnik

backend/src/langs.ts

@@ -118,6 +118,102 @@ implement main0 () = ()
     main: "main.bas",
     run: "bwbasic main.bas",
     template: `PRINT "Hello, world!"
+`,
+  },
+  beatnik: {
+    name: "Beatnik",
+    monacoLang: "plaintext",
+    main: "main.beatnik",
+    run: "beatnik main.beatnik",
+    template: `Soars, larkspurs, rains.
+Indistinctness.
+Mario snarl (nurses, natures, rules...) sensuously retries goal.
+Agribusinesses' costs par lain ropes (mopes) autos' cores.
+Tuner ambitiousness.
+Flit.
+Dour entombment.
+Legals' saner kinking lapse.
+Nests glint.
+Dread, tied futures, dourer usual tumor grunts alter atonal
+  garb tries shouldered coins.
+Taste a vast lustiness.
+Stile stuns gad subgroup gram lanes.
+Draftee insurer road: cuckold blunt, strut sunnier.
+Rely enure pantheism: arty gain groups (genies, pan) titters, tattles, nears.
+Bluffer tapes?  Idle diatom stooge!
+Feted antes anklets ague?  Remit goiter gout!
+Doubtless teared toed alohas will dull gangs' aerials' tails' sluices;
+Gusset ends!  Gawkier halo!
+
+Enter abstruse rested loser beer guy louts.
+Curtain roams lasso weir lupus stunt.
+Truant bears animate talon.  Entire torte originally timer.
+Redo stilt gobs.
+
+Utter centaurs;
+Urgent stars;
+Usurers (dilute);
+Noses;
+Bones;
+Brig sonar graders;
+Utensil silts;
+Lazies.
+Fret arson veterinary rows.
+
+Atlas grunted: "Pates, slues, sulfuric manor liaising tines,
+  trailers, rep... unfair!  Instant snots!"
+
+Sled rested until eatery fail.
+Ergs fortitude
+  Indent spotter
+Euros enter egg.
+Curious tenures.
+Torus cutlasses.
+Sarong torso earns cruel lags it reeled.
+
+Engineer: "Erase handbag -- unite ratification!"
+
+oaring oaten donkeys unsold, surer rapid saltest tags
+BUTTERED TIBIA LUGS REWIRING TOILETS
+anion festers raring edit epilogues.
+DIRGE ROTOR.
+linnet oaring.
+GORE BOOTIES.
+Ironed goon lists tallest sublets --
+Riots,
+Raucous onset.
+
+Ignobly, runners' diet anguishes sunrise loner.
+Erode mob, slier switcher!
+Loaners stilt drudge pearl atoll, risking hats' ends.
+
+Rebind sitters.
+
+Toga epistles -- crud lard.  (Pager purse dons souls.)
+
+glob title a curio hired rites shed suds lade grease strut arctic revs toad
+unless idlers rind stilt region land GERMICIDES SULTANA GUTS gill siting leans
+nice spurs
+tests gloves
+roused asp
+
+Holes!  Moles!  (Sores!)
+Hygienists!  Scars!  (Asses!)
+Smells spell rares.
+
+Cubs instant sing in parse goodies.
+Rosin.  Unhelpful sisal acres.  Slope told.
+MALENESS PASTA LAB.  "Infirmary vine," rang illiterates (beans).
+Rosin sours, insults truss abalones, nailed rules, helical atlases.
+Dear remodeling stings mar rents.
+Sunless shiner orb (silly idol.)
+Clarity disses senna.
+Vagabonds sauted; sloes performed gelds.
+Alter post radial lip sectioning gums.
+Saint Towellings.
+Larger aeons telephone stolid char, pal!
+Boats Dean forsook, rosters, tunas, terrariums -- united, traced.
+Nude pagoda careens.
 `,
   },
   befunge: {

scripts/docker-install-phase7.bash

@@ -5,6 +5,12 @@ set -o pipefail
 set -x
 pushd /tmp >/dev/null
 
+# Beatnik
+git clone https://github.com/catseye/Beatnik.git
+sed -i 's#env python#env python2#' Beatnik/script/beatnik.py
+mv Beatnik/script/beatnik.py /usr/bin/beatnik
+rm -rf Beatnik
+
 # Erlang
 git clone https://github.com/erlang-ls/erlang_ls.git
 pushd erlang_ls >/dev/null