4 lines
89 B
Common Lisp
4 lines
89 B
Common Lisp
(let Freq NIL
|
|
(in "file.txt"
|
|
(while (char) (accu 'Freq @ 1)) )
|
|
(sort Freq) )
|