Changeset 36569 in project


Ignore:
Timestamp:
09/08/18 21:33:49 (2 months ago)
Author:
kon
Message:

remove article stuff

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/5/check-errors/trunk/type-errors-basic.impl.scm

    r36557 r36569  
    1818;;
    1919
    20 (define (->boolean x)
    21   (and x #t) )
     20(define (->boolean x) (and x #t))
    2221
    2322;;;
     
    3130
    3231(define (make-type-name-message typnam)
    33   (or
    34     (localized-type-name-message typnam)
    35     (->string typnam)) )
     32  (->string typnam) )
    3633
    3734(define (make-error-type-message typnam #!optional argnam)
     
    117114;;;
    118115
     116#|
    119117;;
    120118
     
    136134      (car +english-indefinite-articles+)
    137135      (cadr +english-indefinite-articles+) ) ) )
     136|#
Note: See TracChangeset for help on using the changeset viewer.