Parent Directory | Revision Log | Patch
revision 1.2 by pfdietz, Sun Oct 13 15:53:24 2002 UTC | revision 1.3 by pfdietz, Mon Oct 14 03:41:03 2002 UTC | |
---|---|---|
# | Line 19 | Line 19 |
19 | (documentation 'test-constant-1 'variable) | (documentation 'test-constant-1 'variable) |
20 | nil) | nil) |
21 | ||
22 | (defconstant test-constant-2 'a | (defconstant test-constant-2 'a |
23 | (if (boundp test-constant-2) test-constant-2 | "This is the documentation.") |
"This is the documentation.")) | ||
24 | ||
25 | (deftest defconstant.4 | (deftest defconstant.4 |
26 | (documentation 'test-constant-2 'variable) | (documentation 'test-constant-2 'variable) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |