screwlisp on Nostr: #lispmoo2 eeh, I added persisting changes. The way I did it was to use Waters' ...
#lispmoo2 eeh, I added persisting changes. The way I did it was to use Waters' #Series and
(iterate ((s (scan-symbols pkg))
(with-open-file (out path/to/git/pkgname.limo :direction :output :if-exists :append)
(format out "{ @create ~s :named ~s } x~%" (first (get s :parents)) s)))
I guess I'm not meant to use format like this; I'm meant to customize pretty printing using format and then just use print, I guess, but w/e. #lisp
(iterate ((s (scan-symbols pkg))
(with-open-file (out path/to/git/pkgname.limo :direction :output :if-exists :append)
(format out "{ @create ~s :named ~s } x~%" (first (get s :parents)) s)))
I guess I'm not meant to use format like this; I'm meant to customize pretty printing using format and then just use print, I guess, but w/e. #lisp