Changeset 11672


Ignore:
Timestamp:
Jan 31, 2009, 8:42:04 AM (11 years ago)
Author:
gb
Message:

Finally apply the contributed patch to ticket:321.

Location:
release/1.2/source
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/1.2/source/compiler/nx-basic.lisp

    r9200 r11672  
    509509    (:lambda . "Suspicious lambda-list: ~s")
    510510    (:result-ignored . "Function result ignored in call to ~s")
    511     (:program-error . "~a")))
     511    (:program-error . "~a")
     512    (:unsure . "Nonspecific warning.")))
    512513
    513514
  • release/1.2/source/level-1/l1-error-system.lisp

    r8988 r11672  
    7171  (:report report-compiler-warning))
    7272
    73 (define-condition style-warning (compiler-warning))
     73(define-condition style-warning (compiler-warning)
     74  ((warning-type :initform :unsure)
     75   (args :initform nil)))
     76
    7477(define-condition undefined-function-reference (style-warning))
    7578(define-condition macro-used-before-definition (compiler-warning))
Note: See TracChangeset for help on using the changeset viewer.