source: trunk/source/tests/ansi-tests/array-misc.lsp @ 8991

Last change on this file since 8991 was 8991, checked in by gz, 11 years ago

Check in the gcl ansi test suite (original, in preparation for making local changes)

File size: 643 bytes
Line 
1;-*- Mode:     Lisp -*-
2;;;; Author:   Paul Dietz
3;;;; Created:  Wed Jan 22 21:17:25 2003
4;;;; Contains: Misc. tests of array features
5
6(in-package :cl-test)
7
8(deftest array-dimension-limit.1
9  (and (<= 1024 array-dimension-limit) t)
10  t)
11
12(deftest array-dimension-limit.2
13  (and (typep array-dimension-limit 'fixnum) t)
14  t)
15
16(deftest array-total-size-limit.1
17  (and (<= 1024 array-total-size-limit) t)
18  t)
19
20(deftest array-total-size-limit.2
21  (and (typep array-total-size-limit 'fixnum) t)
22  t)
23
24(deftest array-rank-limit.1
25  (and (<= 8 array-rank-limit) t)
26  t)
27
28(deftest array-rank-limit.2
29  (and (typep array-rank-limit 'fixnum) t)
30  t)
Note: See TracBrowser for help on using the repository browser.