mirror of
https://git.freebsd.org/ports.git
synced 2025-07-08 04:49:17 -04:00
4f22912e9b
PR: ports/80016 Submitted by: Johannes Groedem <johs@copyleft.no> (maintainer) Approved by: adamw (mentor)
12 lines
500 B
Common Lisp
12 lines
500 B
Common Lisp
--- code/unix-bindings/unix.lisp~ 2004-01-08 16:34:05.000000000 +0100
|
|
+++ code/unix-bindings/unix.lisp 2004-10-16 16:06:28.000000000 +0200
|
|
@@ -38,7 +38,8 @@
|
|
(defmacro def-c-call-out (sym &body args)
|
|
`(def-call-out ,sym (:language :stdc) ,@args))
|
|
|
|
-#.(when (> (read-from-string (lisp-implementation-version)) 2.30)
|
|
+#.(when (> (read-from-string (subseq (lisp-implementation-version)
|
|
+ 0 4)) 2.30)
|
|
(push :clisp-newer-than-2.30 *features*)
|
|
(values))
|
|
|