<cd> ` echo \'(defun p (str) (format T "~A" str)) (defun pn (str) (format T "~A~%" str))\' > ../etc/clinit.cl
authorhackbot
Thu, 03 Jun 2021 17:11:43 +0000
changeset 208 4ff53c03fe89
parent 207 50194ecece79
child 209 bd7a39c774c6
<cd> ` echo \'(defun p (str) (format T "~A" str)) (defun pn (str) (format T "~A~%" str))\' > ../etc/clinit.cl
etc/clinit.cl
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/etc/clinit.cl	Thu Jun 03 17:11:43 2021 +0000
@@ -0,0 +1,1 @@
+(defun p (str) (format T "~A" str)) (defun pn (str) (format T "~A~%" str))