/[gcl]/gcl/lsp/listlib.data
ViewVC logotype

Diff of /gcl/lsp/listlib.data

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

revision 1.2 by camm, Tue Oct 1 04:37:33 2002 UTC revision 1.3 by camm, Fri Jan 24 18:38:28 2003 UTC
# Line 3  Line 3 
3  (lisp::in-package (lisp::quote user::lisp))#!  (lisp::in-package (lisp::quote user::lisp))#!
4  (lisp::export (lisp::quote (lisp::union lisp::nunion lisp::intersection lisp::nintersection lisp::set-difference lisp::nset-difference lisp::set-exclusive-or lisp::nset-exclusive-or lisp::subsetp)))#!  (lisp::export (lisp::quote (lisp::union lisp::nunion lisp::intersection lisp::nintersection lisp::set-difference lisp::nset-difference lisp::set-exclusive-or lisp::nset-exclusive-or lisp::subsetp)))#!
5  (lisp::in-package (lisp::quote lisp::system))  (lisp::in-package (lisp::quote lisp::system))
6  #("UNION not passed a list" "NUNION not passed a list" "INTERSECTION not passed a list" "NINTERSECTION not passed a list" "SET-DIFFERENCE not passed a list" "SET-DIFFERENCE not passed a list" :rev "NSET-DIFFERENCE not passed a list" "NSET-DIFFERENCE not passed a list" "NSET-EXCLUSIVE-OR not passed a list" "SUBSETP not passed a list" system::member1 :key :test-not :test lisp::set-difference system::set-difference-rev system::nset-difference-rev (system::%init . #((system::mfvfun (lisp::quote lisp::union) 0 16386) (system::mfvfun (lisp::quote lisp::nunion) 1 16386) (system::mfvfun (lisp::quote lisp::intersection) 2 16386) (system::mfvfun (lisp::quote lisp::nintersection) 3 16386) (system::mfvfun (lisp::quote lisp::set-difference) 4 16386) (system::mf (lisp::quote system::set-difference-rev) 5) (system::mfvfun (lisp::quote lisp::nset-difference) 6 16386) (system::mf (lisp::quote system::nset-difference-rev) 7) (system::mfvfun-key (lisp::quote lisp::set-exclusive-or) 8 16386 9) (system::mfvfun (lisp::quote lisp::nset-exclusive-or) 10 16386) (system::mfvfun-key (lisp::quote lisp::subsetp) 11 16386 12))))  #(:key :test :test-not "UNION not passed a list" "NUNION not passed a list" "INTERSECTION not passed a list" "NINTERSECTION not passed a list" "SET-DIFFERENCE not passed a list" "SET-DIFFERENCE not passed a list" :rev "NSET-DIFFERENCE not passed a list" "NSET-DIFFERENCE not passed a list" "NSET-EXCLUSIVE-OR not passed a list" "SUBSETP not passed a list" system::member1 system::key-list lisp::set-difference system::set-difference-rev system::nset-difference-rev lisp::nil (system::%init . #((system::mf (lisp::quote system::key-list) 0) (system::mfvfun-key (lisp::quote lisp::union) 1 16386 2) (system::mfvfun-key (lisp::quote lisp::nunion) 3 16386 4) (system::mfvfun-key (lisp::quote lisp::intersection) 5 16386 6) (system::mfvfun-key (lisp::quote lisp::nintersection) 7 16386 8) (system::mfvfun-key (lisp::quote lisp::set-difference) 9 16386 10) (system::mf (lisp::quote system::set-difference-rev) 11) (system::mfvfun-key (lisp::quote lisp::nset-difference) 12 16386 13) (system::mf (lisp::quote system::nset-difference-rev) 14) (system::mfvfun-key (lisp::quote lisp::set-exclusive-or) 15 16386 16) (system::mfvfun-key (lisp::quote lisp::nset-exclusive-or) 17 16386 18) (system::mfvfun-key (lisp::quote lisp::subsetp) 19 16386 20))))
7  )  )

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