Commit e93ee420 authored by Daniel Kochmański's avatar Daniel Kochmański
Browse files

Merge branch 'restructure-wip' into 'master'

restructure

I've moved parts around ansi-cl-tests - flat directory structure makes it unintelligible and I think that if we want to modernize it a little, then such change is necessary. I might accidently screw something up and it's too drastical change to just push it to master, hence merge-request.

See merge request !1
parents 8412195b 94e25073
*~
*.out
*.dat
*.fas
ansi-aux-macros.fas ansi-aux-macros.fas
ansi-aux.fas ansi-aux.fas
array-aux.fas array-aux.fas
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Sun Feb 15 07:27:22 2004 ;;;; Created: Sun Feb 15 07:27:22 2004
;;;; Contains: Tests of ADJUST-ARRAY ;;;; Contains: Tests of ADJUST-ARRAY
(in-package :cl-test)
(defun listify-form (form) (defun listify-form (form)
(cond (cond
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Mon Jan 20 21:25:22 2003 ;;;; Created: Mon Jan 20 21:25:22 2003
;;;; Contains: Tests for ADJUSTABLE-ARRAY-P ;;;; Contains: Tests for ADJUSTABLE-ARRAY-P
(in-package :cl-test)
(deftest adjustable-array-p.1 (deftest adjustable-array-p.1
(notnot (adjustable-array-p (make-array '(5) :adjustable t))) (notnot (adjustable-array-p (make-array '(5) :adjustable t)))
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Feb 11 17:33:24 2003 ;;;; Created: Tue Feb 11 17:33:24 2003
;;;; Contains: Tests for AREF ;;;; Contains: Tests for AREF
(in-package :cl-test)
;;; AREF is also tested in many other places ;;; AREF is also tested in many other places
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Sun Jan 26 07:45:25 2003 ;;;; Created: Sun Jan 26 07:45:25 2003
;;;; Contains: Tests for ARRAY as a class ;;;; Contains: Tests for ARRAY as a class
(in-package :cl-test)
(deftest array-as-class.1 (deftest array-as-class.1
(notnot-mv (typep #() (find-class 'array))) (notnot-mv (typep #() (find-class 'array)))
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Jan 21 06:55:14 2003 ;;;; Created: Tue Jan 21 06:55:14 2003
;;;; Contains: Tests of ARRAY-DIMENSION ;;;; Contains: Tests of ARRAY-DIMENSION
(in-package :cl-test)
;;; array-dimension is also tested by the tests in make-array.lsp ;;; array-dimension is also tested by the tests in make-array.lsp
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Jan 21 06:59:37 2003 ;;;; Created: Tue Jan 21 06:59:37 2003
;;;; Contains: Tests of ARRAY-DIMENSIONS ;;;; Contains: Tests of ARRAY-DIMENSIONS
(in-package :cl-test)
;;; The tests in make-array.lsp also test this function ;;; The tests in make-array.lsp also test this function
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Jan 21 06:20:51 2003 ;;;; Created: Tue Jan 21 06:20:51 2003
;;;; Contains: Tests for ARRAY-DISPLACEMENT ;;;; Contains: Tests for ARRAY-DISPLACEMENT
(in-package :cl-test)
;;; The tests in make-array.lsp also test array-displacement ;;; The tests in make-array.lsp also test array-displacement
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
;;;; Author: Paul Dietz ;;;; Author: Paul Dietz
;;;; Contains: Tests of the function ARRAY-ELEMENT-TYPE ;;;; Contains: Tests of the function ARRAY-ELEMENT-TYPE
(in-package :cl-test)
;;; Mosts tests are in other files, incidental to testing of ;;; Mosts tests are in other files, incidental to testing of
;;; other things ;;; other things
......
...@@ -2,8 +2,6 @@ ...@@ -2,8 +2,6 @@
;;;; Author: Paul Dietz ;;;; Author: Paul Dietz
;;;; Contains: Tests of the function ARRAY-HAS-FILL-POINTER-P ;;;; Contains: Tests of the function ARRAY-HAS-FILL-POINTER-P
(in-package :cl-test)
;;; Many tests are in other files, incidental to testing of ;;; Many tests are in other files, incidental to testing of
;;; other things ;;; other things
...@@ -52,5 +50,3 @@ ...@@ -52,5 +50,3 @@
(deftest array-has-fill-pointer-p.error.4 (deftest array-has-fill-pointer-p.error.4
(signals-type-error x nil (array-has-fill-pointer-p x)) (signals-type-error x nil (array-has-fill-pointer-p x))
t) t)
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Jan 21 19:57:29 2003 ;;;; Created: Tue Jan 21 19:57:29 2003
;;;; Contains: Tests for ARRAY-IN-BOUNDS-P ;;;; Contains: Tests for ARRAY-IN-BOUNDS-P
(in-package :cl-test)
(deftest array-in-bounds-p.1 (deftest array-in-bounds-p.1
(array-in-bounds-p #() 0) (array-in-bounds-p #() 0)
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Wed Jan 22 21:17:25 2003 ;;;; Created: Wed Jan 22 21:17:25 2003
;;;; Contains: Misc. tests of array features ;;;; Contains: Misc. tests of array features
(in-package :cl-test)
(deftest array-dimension-limit.1 (deftest array-dimension-limit.1
(and (<= 1024 array-dimension-limit) t) (and (<= 1024 array-dimension-limit) t)
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Jan 21 20:32:57 2003 ;;;; Created: Tue Jan 21 20:32:57 2003
;;;; Contains: Tests for ARRAY-RANK ;;;; Contains: Tests for ARRAY-RANK
(in-package :cl-test)
;;; Most tests for ARRAY-RANK are in make-array.lsp ;;; Most tests for ARRAY-RANK are in make-array.lsp
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Jan 21 21:37:03 2003 ;;;; Created: Tue Jan 21 21:37:03 2003
;;;; Contains: Tests of ARRAY-ROW-MAJOR-INDEX ;;;; Contains: Tests of ARRAY-ROW-MAJOR-INDEX
(in-package :cl-test)
;;; More array-row-major-index tests are in make-array.lsp ;;; More array-row-major-index tests are in make-array.lsp
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Sat Jan 25 11:55:48 2003 ;;;; Created: Sat Jan 25 11:55:48 2003
;;;; Contains: Tests of (array t ...) type specifiers ;;;; Contains: Tests of (array t ...) type specifiers
(in-package :cl-test)
;;; Tests of (array t) ;;; Tests of (array t)
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Jan 21 22:01:09 2003 ;;;; Created: Tue Jan 21 22:01:09 2003
;;;; Contains: Tests of ARRAY-TOTAL-SIZE ;;;; Contains: Tests of ARRAY-TOTAL-SIZE
(in-package :cl-test)
;;; More tests of ARRAY-TOTAL-SIZE are in make-array.lsp ;;; More tests of ARRAY-TOTAL-SIZE are in make-array.lsp
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Sat Jan 25 08:46:58 2003 ;;;; Created: Sat Jan 25 08:46:58 2003
;;;; Contains: Tests of the ARRAY type specifier ;;;; Contains: Tests of the ARRAY type specifier
(in-package :cl-test)
;;; Tests of array by itself ;;; Tests of array by itself
......
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
;;;; Created: Tue Jan 21 22:08:21 2003 ;;;; Created: Tue Jan 21 22:08:21 2003
;;;; Contains: Tests of ARRAYP ;;;; Contains: Tests of ARRAYP
(in-package :cl-test)
;;; Also tested by make-array.lsp ;;; Also tested by make-array.lsp
......
...@@ -3,9 +3,9 @@ ...@@ -3,9 +3,9 @@
;;;; Created: Sun Jan 26 18:18:47 2003 ;;;; Created: Sun Jan 26 18:18:47 2003
;;;; Contains: Tests of BIT-AND ;;;; Contains: Tests of BIT-AND
(in-package :cl-test)
(compile-and-load "bit-aux.lsp")
(deftest bit-and.1 (deftest bit-and.1
(let* ((s1 (make-array nil :initial-element 0 :element-type 'bit)) (let* ((s1 (make-array nil :initial-element 0 :element-type 'bit))
......
...@@ -3,9 +3,9 @@ ...@@ -3,9 +3,9 @@
;;;; Created: Sun Jan 26 18:56:39 2003 ;;;; Created: Sun Jan 26 18:56:39 2003
;;;; Contains: Tests of BIT-ANDC1 ;;;; Contains: Tests of BIT-ANDC1
(in-package :cl-test)
(compile-and-load "bit-aux.lsp")
(deftest bit-andc1.1 (deftest bit-andc1.1
(let* ((s1 (make-array nil :initial-element 0 :element-type 'bit)) (let* ((s1 (make-array nil :initial-element 0 :element-type 'bit))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment