home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / lsp / seq.data < prev    next >
Encoding:
Text File  |  1994-05-10  |  1.0 KB  |  8 lines
  1.        
  2. #(#! 
  3. (lisp::in-package (lisp::quote user::lisp))#! 
  4. (lisp::export (lisp::quote (lisp::make-sequence lisp::concatenate lisp::map lisp::some lisp::every lisp::notany lisp::notevery)))#! 
  5. (lisp::in-package (lisp::quote lisp::system))
  6. #(lisp::list :initial-element lisp::simple-string lisp::string lisp::string-char lisp::simple-bit-vector lisp::bit-vector lisp::bit lisp::simple-vector lisp::vector lisp::array lisp::simple-array "~S is not a sequence type." system::normalize-type system::best-array-element-type lisp::make-sequence lisp::some lisp::every (system::%init . #((system::warn-version 0) (lisp::proclaim (lisp::quote (lisp::optimize (lisp::safety 2) (lisp::space 3)))) (system::mfvfun-key (lisp::quote lisp::make-sequence) 0 1026 1) (system::mfvfun (lisp::quote lisp::concatenate) 2 16385) (system::mfvfun (lisp::quote lisp::map) 3 16387) (system::mfvfun (lisp::quote lisp::some) 4 16386) (system::mfvfun (lisp::quote lisp::every) 5 16386) (system::mfvfun (lisp::quote lisp::notany) 6 16386) (system::mfvfun (lisp::quote lisp::notevery) 7 16386))))
  7. )
  8.