From: Chris Hanson Date: Mon, 5 Feb 2001 18:34:54 +0000 (+0000) Subject: CHAR-SET:NOT-GRAPHIC now defined by runtime system. X-Git-Tag: 20090517-FFI~2985 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=db1881feb102e7259beaa043fe0b3571bcf914d8;p=mit-scheme.git CHAR-SET:NOT-GRAPHIC now defined by runtime system. --- diff --git a/v7/src/edwin/utils.scm b/v7/src/edwin/utils.scm index 7ddca69f3..7e716b006 100644 --- a/v7/src/edwin/utils.scm +++ b/v7/src/edwin/utils.scm @@ -1,8 +1,8 @@ ;;; -*-Scheme-*- ;;; -;;; $Id: utils.scm,v 1.46 1999/11/05 05:36:14 cph Exp $ +;;; $Id: utils.scm,v 1.47 2001/02/05 18:34:54 cph Exp $ ;;; -;;; Copyright (c) 1986, 1989-1999 Massachusetts Institute of Technology +;;; Copyright (c) 1986, 1989-2001 Massachusetts Institute of Technology ;;; ;;; This program is free software; you can redistribute it and/or ;;; modify it under the terms of the GNU General Public License as @@ -224,9 +224,6 @@ (define char-set:not-space (char-set-invert (char-set #\Space))) -(define char-set:not-graphic - (char-set-invert char-set:graphic)) - (define (char-controlify char) (if (ascii-controlified? char) char