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

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

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

revision 1.3 by pfdietz, Sat Feb 15 05:11:11 2003 UTC revision 1.4 by pfdietz, Mon Feb 17 04:22:03 2003 UTC
# Line 111  Line 111 
111    
112  ;;; Order of evaluation tests  ;;; Order of evaluation tests
113    
114  (deftest bit.9  (deftest bit.order.1
115    (let ((x 0) y z    (let ((x 0) y z
116          (b (copy-seq #*01010)))          (b (copy-seq #*01010)))
117      (values      (values
# Line 120  Line 120 
120       x y z))       x y z))
121    1 2 1 2)    1 2 1 2)
122    
123  (deftest bit.10  (deftest bit.order.2
124    (let ((x 0) y z w    (let ((x 0) y z w
125          (b (copy-seq #*01010)))          (b (copy-seq #*01010)))
126      (values      (values

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

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