Commit 88cf8abe authored by Pascal J. Bourguignon's avatar Pascal J. Bourguignon

Use keywords for loop keywords.

parent 8a0b6635
......@@ -1491,7 +1491,7 @@ with-lock-held (place &optional state) &body body
(loop for i from 0 to 10 do (print i *out*)(force-output *out*)(princ "."))
(loop repeat 2 do
(loop :repeat 2 :do
(linux:set-signal-handler
linux:SIGUSR1
(lambda (signal) (princ " Got signal ") (throw :hot-potatoe signal)))
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment