Changeset 14166 in project


Ignore:
Timestamp:
04/08/09 04:19:52 (11 years ago)
Author:
Kon Lovett
Message:

Canonical form.

Location:
release/4/check-errors
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/4/check-errors/tags/1.0.0/type-errors.scm

    r14139 r14166  
    8686
    8787(define-error-type fixnum)
    88 (define-error-type positive-fixnum "positive fixnum")
    89 (define-error-type cardinal-fixnum "cardinal fixnum")
     88(define-error-type positive-fixnum)
     89(define-error-type cardinal-fixnum)
    9090(define-error-type flonum)
    9191(define-error-type integer)
    92 (define-error-type positive-integer "positive integer")
    93 (define-error-type cardinal-integer "cardinal integer")
     92(define-error-type positive-integer)
     93(define-error-type cardinal-integer)
    9494(define-error-type number)
    95 (define-error-type positive-number "positive number")
    96 (define-error-type cardinal-number "cardinal number")
     95(define-error-type positive-number)
     96(define-error-type cardinal-number)
    9797(define-error-type procedure)
    98 (define-error-type input-port "input port")
    99 (define-error-type output-port "output port")
     98(define-error-type input-port)
     99(define-error-type output-port)
    100100(define-error-type list)
    101101(define-error-type pair)
  • release/4/check-errors/trunk/type-errors.scm

    r14139 r14166  
    8686
    8787(define-error-type fixnum)
    88 (define-error-type positive-fixnum "positive fixnum")
    89 (define-error-type cardinal-fixnum "cardinal fixnum")
     88(define-error-type positive-fixnum)
     89(define-error-type cardinal-fixnum)
    9090(define-error-type flonum)
    9191(define-error-type integer)
    92 (define-error-type positive-integer "positive integer")
    93 (define-error-type cardinal-integer "cardinal integer")
     92(define-error-type positive-integer)
     93(define-error-type cardinal-integer)
    9494(define-error-type number)
    95 (define-error-type positive-number "positive number")
    96 (define-error-type cardinal-number "cardinal number")
     95(define-error-type positive-number)
     96(define-error-type cardinal-number)
    9797(define-error-type procedure)
    98 (define-error-type input-port "input port")
    99 (define-error-type output-port "output port")
     98(define-error-type input-port)
     99(define-error-type output-port)
    100100(define-error-type list)
    101101(define-error-type pair)
Note: See TracChangeset for help on using the changeset viewer.