/[gcl]/gcl/ansi-tests/search-aux.lsp
ViewVC logotype

Diff of /gcl/ansi-tests/search-aux.lsp

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

revision 1.1 by pfdietz, Thu Sep 26 16:53:38 2002 UTC revision 1.2 by pfdietz, Sat Mar 1 03:35:48 2003 UTC
# Line 6  Line 6 
6  (in-package :cl-test)  (in-package :cl-test)
7    
8  (defparameter *searched-list*  (defparameter *searched-list*
9    '(B B A B B B B B B B A B A B B B A B A B B B A A A A B A A B A A A A A    '(b b a b b b b b b b a b a b b b a b a b b b a a a a b a a b a a a a a
10        A B A B B A B A A B A A A B B A A B A A A A B B A B A B A A A B A B        a b a b b a b a a b a a a b b a a b a a a a b b a b a b a a a b a b
11        B A B A A B B B B B A A A A A B A B B B B B A B A B B A B A B))        b a b a a b b b b b a a a a a b a b b b b b a b a b b a b a b))
12    
13  (defparameter *pattern-sublists*  (defparameter *pattern-sublists*
14    (remove-duplicates    (remove-duplicates

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