X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=seqs.lisp;h=b86d5ec177f215a0a92d018831019671ec4b03e4;hp=92a4aa05818cce6454f0de95de635de031b440e8;hb=298d0534004c26eb5a6881ea34658f59e180b63b;hpb=123adbaf1fb442ffff615c56e118bfd374f02b9f diff --git a/seqs.lisp b/seqs.lisp index 92a4aa0..b86d5ec 100644 --- a/seqs.lisp +++ b/seqs.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: seqs.lisp,v 1.1 2003/04/29 00:26:21 kevin Exp $ +;;;; $Id: seqs.lisp,v 1.2 2003/05/04 14:52:10 kevin Exp $ ;;;; ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -59,7 +59,6 @@ (cdr lb) (concatenate 'string accum (funcall func a b))) accum))) - (defun nsubseq (sequence start &optional (end (length sequence)))