mirror of https://codeberg.org/anemofilia/zero
11 lines
194 B
Plaintext
11 lines
194 B
Plaintext
|
#!/usr/bin/env -S guile
|
||
|
|
!#
|
||
|
|
|
||
|
|
(use-modules (ice-9 pretty-print)
|
||
|
|
(ice-9 match))
|
||
|
|
|
||
|
|
(pretty-print
|
||
|
|
(match (command-line)
|
||
|
|
[(_) (read)]
|
||
|
|
[(_ str) (with-input-from-string str read)]))
|