/ test /
/test/package.lisp
 1 ;; -*- mode: Lisp; Syntax: Common-Lisp; -*-
 2 ;;;
 3 ;;; Copyright (c) 2006 by the authors.
 4 ;;;
 5 ;;; See LICENCE for details.
 6 
 7 (in-package :cl-user)
 8 
 9 (defpackage :cl-perec-test
10     (:nicknames :prct)
11 
12   (:use :common-lisp
13         :closer-mop
14         :iterate
15         :anaphora
16         :alexandria
17         :bind
18         :defclass-star
19         :computed-class
20         :local-time
21         :stefil
22         :cl-def
23         :cl-rdbms
24         :cl-perec
25         :cl-ppcre
26         :metacopy-with-contextl)
27 
28   (:shadow #:name
29            #:parent)
30 
31   (:shadowing-import-from :cl-perec
32                           #:time
33                           #:form
34                           #:set))
35 
36 (eval-when (:compile-toplevel :load-toplevel :execute)
37   (import (let ((*package* (find-package :cl-perec)))
38             (read-from-string "(*persistent-classes*
39                                 *persistent-associations* *cache-slot-values*
40                                 *mapped-type-precedence-list* *canonical-types* *compile-query-counter*
41                                 *test-query-compiler* +unbound-slot-marker+ +not-cached-slot-marker+
42                                 unbound-slot-marker-p
43                                 canonical-type-for normalized-type-for mapped-type-for 
44                                 first-moment-for-partial-timestamp last-moment-for-partial-timestamp
45                                 less-or-equal-p greater-or-equal-p
46                                 validity-begin validity-end t-value unbound-slot-t
47                                 find-slot collect-if concatenate-symbol
48                                 unbound-subtype-p null-subtype-p set-type-p set-type-p*
49                                 invalidate-cached-instance invalidate-all-cached-instances persistent
50                                 clear-compiled-query-cache reset-compile-query-counter
51                                 ensure-exported primary-table-slot-p data-table-slot-p
52                                 primary-table-of primary-table-of data-tables-of 
53                                 direct-instances-identity-view-of direct-instances-data-view-of
54                                 all-instances-identity-view-of all-instances-data-view-of
55                                 prefetch-p cache-p compute-mapping reader-of writer-of
56                                 compute-rdbms-types compute-reader compute-writer
57                                 table-of columns-of reader-name-of writer-name-of
58                                 lisp-value->rdbms-values rdbms-values->lisp-value
59                                 depends-on-of depends-on-me-of primary-class-of effective-store-of
60                                 compile-query random-string)"))
61           :cl-perec-test))