Skip to content

Commit 42b4e4a

Browse files
committed
make portable with #+sbcl
1 parent 5ed75e5 commit 42b4e4a

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

main.lisp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -290,10 +290,10 @@ Primarily used anonymize IPs and hash fields with ANONIP and HASH."
290290
;;
291291
;; if you handle END-OF-FILE here, it prevents the RESTART-CASE in the COMPILE-RUNTIME-* functions from being
292292
;; able to handle the restarts. unsure why.
293-
(sb-int:broken-pipe nil)
293+
#+sbcl (sb-int:broken-pipe nil)
294294
;; If there's a debugger error, after aborting SIMPLE-FILE-ERROR is raised again. This let's a user immediately
295295
;; exit after running into an error.
296-
(sb-int:simple-file-error nil)))))
296+
#+sbcl (sb-int:simple-file-error nil)))))
297297

298298
(defun cat/command ()
299299
(clingon:make-command

0 commit comments

Comments
 (0)