/[gcl]/gcl/ansi-tests/logbitp.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/logbitp.lsp

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

revision 1.2 by pfdietz, Tue Sep 9 13:31:41 2003 UTC revision 1.3 by pfdietz, Wed Sep 10 00:09:14 2003 UTC
# Line 47  Line 47 
47    
48  (deftest logbitp.3  (deftest logbitp.3
49    (logbitp most-positive-fixnum 0)    (logbitp most-positive-fixnum 0)
50    0)    nil)
51                    
52  (deftest logbitp.4  (deftest logbitp.4
53    (notnot-mv (logbitp most-positive-fixnum -1))    (notnot-mv (logbitp most-positive-fixnum -1))
# Line 55  Line 55 
55    
56  (deftest logbitp.5  (deftest logbitp.5
57    (logbitp (1+ most-positive-fixnum) 0)    (logbitp (1+ most-positive-fixnum) 0)
58    0)    nil)
59                    
60  (deftest logbitp.6  (deftest logbitp.6
61    (notnot-mv (logbitp (1+ most-positive-fixnum) -1))    (notnot-mv (logbitp (1+ most-positive-fixnum) -1))

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

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