Skip to content
Snippets Groups Projects
Commit 8344b977 authored by wlott's avatar wlott
Browse files

Added defns for BACKEND-FEATUREP and TARGET-FEATUREP.

parent 52af4268
No related branches found
No related tags found
No related merge requests found
......@@ -261,3 +261,14 @@
(when load
(load name :verbose t)))))))))
;;;; BACKEND-FEATUREP and TARGET-FEATUREP
(defun target-featurep (feature)
(let ((*features* (c:backend-features c:*target-backend*)))
(lisp::featurep feature)))
(defun backend-featurep (feature)
(let ((*features* (c:backend-features c:*backend*)))
(lisp::featurep feature)))
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment