radio: files: .local/bin: Add prettify-sexp

2024-08-11 12:21:49 -03:00 · 2024-08-11 12:21:49 -03:00 · 4fae41c85b
parent 069a6b7989
commit 4fae41c85b
1 changed files with 10 additions and 0 deletions
--- a/home-environments/radio/files/.local/bin/prettify-sexp
+++ b/home-environments/radio/files/.local/bin/prettify-sexp
@ -0,0 +1,10 @@
+#!/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)]))