haskell oneliner with programming ligatures

[unicode-sampler.git] / unicode.txt

diff --git a/unicode.txt b/unicode.txt
index 184fb34f0e8d8eecadd96253d340848865e319e2..9e63c876cc6a81c2eaecbb3dd7d44e5aecd6cc4e 100644 (file)
--- a/unicode.txt
+++ b/unicode.txt
@@ -20,10 +20,12 @@ Code:
 
   Hash[ :nbsp => 0O2_40 ].each {|name, cp| puts "#{name} is '#{cp.chr}'" }
 
-  while ((c = *l++) != '\0') { m->stat[2] = IO | (~OK & X_8); }
+  while ((c = *l++) != '\0') { m->stat[2] = IO | (~OK & X_8); } /* C */
 
   perl -pe's/\w/$^ =~ $& > chop($^ = $& . $^) ? "@-" : $&/ge'
 
+  fix$(<$>)<$>(:)<*>((<$>((:[{- hs -}])<$>))(=<<)<$>(*)<$>(>>=)(+)($))$1
+
   ↑1 ⍵∨.∧3 4=+/,¯1 0 1∘.⊖¯1 0 1⌽¨⊂⍵ ⍝ game of life
 
 Mathematics and sciences: