[Scsh-checkins] CVS: scsh-0.6/scsh/lib cset-obsolete.scm,1.1,1.2 char-package.scm,1.1,1.2

[Martin Gasbichler <mainzelm@users.sourceforge.net>]

Update of /cvsroot/scsh/scsh-0.6/scsh/lib
In directory usw-pr-cvs1:/tmp/cvs-serv11199/lib

Modified Files:
        cset-obsolete.scm char-package.scm 
Log Message:
Sync with scsh tree

Index: cset-obsolete.scm
===================================================================
RCS file: /cvsroot/scsh/scsh-0.6/scsh/lib/cset-obsolete.scm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** cset-obsolete.scm   2001/03/23 10:52:09     1.1
--- cset-obsolete.scm   2001/06/06 11:06:05     1.2
***************
*** 7,12 ****
          ascii-range->char-set         ; ucs-range->char-set (not exact)
          predicate->char-set           ; char-set-filter (not exact)
!         ->char-set                    ; no longer handles a predicate
          char-set-every?               ; char-set-every
  
          char-set-invert               ; char-set-complement
--- 7,13 ----
          ascii-range->char-set         ; ucs-range->char-set (not exact)
          predicate->char-set           ; char-set-filter (not exact)
!         ;->char-set                   ; no longer handles a predicate
          char-set-every?               ; char-set-every
+         char-set-any?                 ; char-set-any
  
          char-set-invert               ; char-set-complement
***************
*** 39,49 ****
      (define char-set-every?
        (deprecated-proc char-set-every 'char-set-every?
!                      "Use CHAR-SET-EVERYyn instead."))
      (define char-set-invert
        (deprecated-proc char-set-complement 'char-set-invert
!                      "Use CHAR-SET-COMPLEMENTyn instead."))
      (define char-set-invert!
        (deprecated-proc char-set-complement! 'char-set-invert!
!                      "Use CHAR-SET-COMPLEMENT!yn instead."))
  
      (define char-set:alphabetic               char-set:letter)
--- 40,53 ----
      (define char-set-every?
        (deprecated-proc char-set-every 'char-set-every?
!                      "Use CHAR-SET-EVERY instead."))
!     (define char-set-any?
!       (deprecated-proc char-set-every 'char-set-any?
!                      "Use CHAR-SET-ANY instead."))
      (define char-set-invert
        (deprecated-proc char-set-complement 'char-set-invert
!                      "Use CHAR-SET-COMPLEMENT instead."))
      (define char-set-invert!
        (deprecated-proc char-set-complement! 'char-set-invert!
!                      "Use CHAR-SET-COMPLEMENT! instead."))
  
      (define char-set:alphabetic               char-set:letter)

Index: char-package.scm
===================================================================
RCS file: /cvsroot/scsh/scsh-0.6/scsh/lib/char-package.scm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** char-package.scm    2001/03/23 10:52:09     1.1
--- char-package.scm    2001/06/06 11:06:05     1.2
***************
*** 2,6 ****
  ;;; It includes some R5RS defs that are not correct in S48 in a Latin-1 world.
  
! (define-interface char-set-predicates-interface
    (export
     ((char-lower-case?         ; R5RS
--- 2,6 ----
  ;;; It includes some R5RS defs that are not correct in S48 in a Latin-1 world.
  
! (define-interface char-predicates-interface
    (export
     ((char-lower-case?         ; R5RS
***************
*** 25,29 ****
  
  
! (define-structure char-set-predicates-lib char-set-predicates-interface
    (open error-package ; ERROR
        scsh-utilities  ; DEPRECATED-PROC
--- 25,29 ----
  
  
! (define-structure char-predicates-lib char-predicates-interface
    (open error-package ; ERROR
        scsh-utilities  ; DEPRECATED-PROC