Changeset 14230 in project


Ignore:
Timestamp:
04/10/09 17:41:24 (11 years ago)
Author:
Kon Lovett
Message:

Rmvd extra space.

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

Legend:

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

    r14229 r14230  
    5757                       loc
    5858                       (conc "bad"
    59                              #\space (if argnam (conc #\` (->string argnam) #\') "")
    60                              #\space "argument type - not"
     59                             #\space (if argnam (conc #\` argnam #\' #\space) "")
     60                             "argument type - not"
    6161                             #\space (if (vowel? (string-ref kndnam 0)) "an" "a")
    6262                             #\space kndnam)
  • release/4/check-errors/trunk/type-errors.scm

    r14229 r14230  
    5757                       loc
    5858                       (conc "bad"
    59                              #\space (if argnam (conc #\` argnam #\') "")
    60                              #\space "argument type - not"
     59                             #\space (if argnam (conc #\` argnam #\' #\space) "")
     60                             "argument type - not"
    6161                             #\space (if (vowel? (string-ref kndnam 0)) "an" "a")
    6262                             #\space kndnam)
Note: See TracChangeset for help on using the changeset viewer.