Skip to content
Snippets Groups Projects
Commit bf214ce6 authored by pfdietz's avatar pfdietz
Browse files

Begin adding tests for SUBTYPEP on function types.

parent 236fe51f
No related branches found
No related tags found
No related merge requests found
...@@ -12,6 +12,7 @@ ...@@ -12,6 +12,7 @@
(load "subtypep-member.lsp") (load "subtypep-member.lsp")
(load "subtypep-eql.lsp") (load "subtypep-eql.lsp")
(load "subtypep-array.lsp") (load "subtypep-array.lsp")
(load "subtypep-function.lsp")
(load "deftype.lsp") (load "deftype.lsp")
(load "standard-generic-function.lsp") (load "standard-generic-function.lsp")
......
;-*- Mode: Lisp -*-
;;;; Author: Paul Dietz
;;;; Created: Wed Dec 15 21:57:44 2004
;;;; Contains: Tests of SUBTYPEP on FUNCTION types
(in-package :cl-test)
(deftest subtypep-function.1
(check-all-subtypep t '(function (t) t))
nil)
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