From: Chris Hanson Date: Thu, 28 Apr 2005 04:36:22 +0000 (+0000) Subject: Add indentation for COUNT-MATCHING-ITEMS and COUNT-NON-MATCHING-ITEMS. X-Git-Tag: 20090517-FFI~1318 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=afa7198eeb423bcddce294c5a1e16f0f1143281d;p=mit-scheme.git Add indentation for COUNT-MATCHING-ITEMS and COUNT-NON-MATCHING-ITEMS. --- diff --git a/v7/src/edwin/schmod.scm b/v7/src/edwin/schmod.scm index 492e3bbd0..d34cb8a63 100644 --- a/v7/src/edwin/schmod.scm +++ b/v7/src/edwin/schmod.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: schmod.scm,v 1.69 2005/03/30 03:53:06 cph Exp $ +$Id: schmod.scm,v 1.70 2005/04/28 04:36:22 cph Exp $ Copyright 1986,1989,1990,1991,1992,1998 Massachusetts Institute of Technology Copyright 2000,2001,2002,2003,2004,2005 Massachusetts Institute of Technology @@ -190,7 +190,8 @@ The following commands evaluate Scheme expressions: WITH-INPUT-FROM-PORT WITH-INPUT-FROM-STRING WITH-OUTPUT-TO-PORT CALL-WITH-VALUES WITH-VALUES WITHIN-CONTINUATION KEEP-MATCHING-ITEMS KEEP-MATCHING-ITEMS! DELETE-MATCHING-ITEMS - DELETE-MATCHING-ITEMS! FIND-MATCHING-ITEM + DELETE-MATCHING-ITEMS! FIND-MATCHING-ITEM FIND-NON-MATCHING-ITEM + COUNT-MATCHING-ITEMS COUNT-NON-MATCHING-ITEMS LIST-TRANSFORM-POSITIVE LIST-TRANSFORM-NEGATIVE LIST-SEARCH-POSITIVE LIST-SEARCH-NEGATIVE FOR-ALL? THERE-EXISTS? LIST-OF-TYPE? VECTOR-OF-TYPE?)