~jojo/Carth

ref: c5a394b01aa60cb95605d66f6118cfb231955aa7 Carth/examples/count-lines.carth -rw-r--r-- 124 bytes
c5a394b0JoJo Fix class constraint inference bug when explicit scheme given 8 months ago
                                                                                
1
2
3
4
5
;; Count lines of stdin

(import std)

(define main (io/bind display (io/map (<o show-nat (<o count lines)) get-contents)))