git.shiar.nl
/
unicode-sampler.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
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}'" }
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'
perl -pe's/\w/$^ =~ $& > chop($^ = $& . $^) ? "@-" : $&/ge'
+ fix$(<$>)<$>(:)<*>((<$>((:[{- hs -}])<$>))(=<<)<$>(*)<$>(>>=)(+)($))$1
+
↑1 ⍵∨.∧3 4=+/,¯1 0 1∘.⊖¯1 0 1⌽¨⊂⍵ ⍝ game of life
Mathematics and sciences:
↑1 ⍵∨.∧3 4=+/,¯1 0 1∘.⊖¯1 0 1⌽¨⊂⍵ ⍝ game of life
Mathematics and sciences: