Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Karsten Poeck
ansi-test
Commits
b860b30b
Commit
b860b30b
authored
May 23, 2005
by
pfdietz
Browse files
Begin moving some typep tests to their own file; add more error tests for typep
parent
e0a297aa
Changes
3
Show whitespace changes
Inline
Side-by-side
ansi-tests/load-types-and-class.lsp
View file @
b860b30b
...
...
@@ -18,4 +18,5 @@
(load "deftype.lsp")
(load "standard-generic-function.lsp")
(load "type-of.lsp")
(load "typep.lsp")
(load "class-precedence-lists.lsp")
ansi-tests/typep.lsp
0 → 100644
View file @
b860b30b
;-*- Mode: Lisp -*-
;;;; Author: Paul Dietz
;;;; Created: Mon May 23 07:13:32 2005
;;;; Contains: Tests of TYPEP
(in-package :cl-test)
(deftest typep.error.1
(signals-error (typep) program-error)
t)
(deftest typep.error.2
(signals-error (typep nil) program-error)
t)
(deftest typep.error.3
(signals-error (typep nil t nil nil) program-error)
t)
(deftest typep.error.4
(signals-error-always (typep nil 'values) error)
t t)
(deftest typep.error.5
(signals-error-always (typep nil '(values)) error)
t t)
(deftest typep.error.6
(signals-error-always (typep nil '(values t t t t)) error)
t t)
(deftest typep.error.7
(signals-error-always (typep nil '(function () t)) error)
t t)
ansi-tests/types-and-class.lsp
View file @
b860b30b
...
...
@@ -252,18 +252,6 @@
;;; Error checking of type-related functions
(deftest typep.error.1
(signals-error (typep) program-error)
t)
(deftest typep.error.2
(signals-error (typep nil) program-error)
t)
(deftest typep.error.3
(signals-error (typep nil t nil nil) program-error)
t)
(deftest type-error-datum.error.1
(signals-error (type-error-datum) program-error)
t)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment