/[gcl]/gcl/ansi-tests/rt/rt-package.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/rt/rt-package.lsp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by pfdietz, Thu Sep 26 16:48:59 2002 UTC revision 1.2 by pfdietz, Wed Dec 18 04:01:33 2002 UTC
# Line 1  Line 1 
1  ;-*- Mode:     Lisp -*-  ;-*- Mode:     Lisp -*-
 ;;;; Copyright 1998 Motorola, Inc.  All right reserved.  
 ;;;; Motorola Internal Use Only.  
 ;;;;  
2  ;;;; Author:   Paul Dietz  ;;;; Author:   Paul Dietz
3  ;;;; Created:  Sat Mar  7 10:32:13 1998  ;;;; Created:  Tue Dec 17 21:10:53 2002
4  ;;;; Contains: Package definition for RT system (new form)  ;;;; Contains: Package definition for RT
5    
6  (eval-when  (eval-when
7   ;;(:execute :compile-toplevel :load-toplevel)   ;;(:execute :compile-toplevel :load-toplevel)
8   (load eval compile)   (load eval compile)
9   (defpackage :rt   (defpackage :rt
     (:nicknames)  
10      (:use :cl)      (:use :cl)
11      (:export      (:export
12       "DEFTEST" "GET-TEST" "DO-TEST" "REM-TEST"       "*DO-TESTS-WHEN-DEFINED*"
13       "REM-ALL-TESTS" "DO-TESTS" "PENDING-TESTS"       "*TEST*"
14       "CONTINUE-TESTING" "*TEST*" "*DO-TESTS-WHEN-DEFINED*")))       "CONTINUE-TESTING"
15         "DEFTEST"
16         "DO-TEST"
17         "DO-TESTS"
18         "GET-TEST"
19         "PENDING-TESTS"
20         "REM-ALL-TESTS"
21         "REM-TEST"
22         )))
23    
24  (in-package :rt)  (in-package :rt)

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26