commit 69f9180bb2978a7224f17d2d01afa7b3f4ffae7f parent 35b54fe1da4aa7de7aa190f72dab8c37433a7c31 Author: Bertrand BRUN <bertrand.brun@me.com> Date: Sat, 6 Nov 2010 01:29:38 +0100 Renommage de readfile en mload Diffstat:
| M | util.lisp | | | 2 | +- |
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/util.lisp b/util.lisp @@ -57,7 +57,7 @@ (shift ,(count-if (lambda (x) (eq x :skip)) params) actual-params)))) -(defun readfile (name) +(defun mload (name) (let ((fd (open name))) (cons 'progn (loop