Changeset 13187 for trunk/source/level-1


Ignore:
Timestamp:
Nov 11, 2009, 1:06:00 AM (10 years ago)
Author:
gz
Message:

warn about too many arguments in format strings

Location:
trunk/source/level-1
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/l1-error-system.lisp

    r13067 r13187  
    396396   (lambda (c s)
    397397     (let* ((p (package-error-package c)))
    398        (format s "The following symbols need to be imported to ~S before they can be exported ~& from that package:~%~s:" p (slot-value c 'to-be-imported) p)))))
     398       (format s "The following symbols need to be imported to ~S before they can be exported ~& from that package:~%~s:" p (slot-value c 'to-be-imported))))))
    399399
    400400
  • trunk/source/level-1/linux-files.lisp

    r13121 r13187  
    846846    (%setf-macptr p (#_strerror errno))
    847847    (if (%null-ptr-p p)
    848       (format nil "OS Error %d" errno)
     848      (format nil "OS Error ~d" errno)
    849849      (%get-cstring p))))
    850850
Note: See TracChangeset for help on using the changeset viewer.