Another broken test courtesy of refactoring, not testing, and ignoring DrDr. In this case, it seems like the user should not have relied on the function always returning a string (based on the old documentation---not the name, which implies a string comes out), so I've changed the use rather than the function.
This commit is contained in:
parent
8d6827e741
commit
439bbc6d8f
|
@ -188,7 +188,9 @@
|
|||
;; this check is also done in compiler/compiler-unit, in compile-directory
|
||||
(and (not (eq? 'all (omitted-paths path getinfo)))
|
||||
(make-cc collection path
|
||||
(if name (string-append path-name " (" name ")") path-name)
|
||||
(if name
|
||||
(format "~a (~a)" path-name name)
|
||||
path-name)
|
||||
info root-dir info-path shadowing-policy)))
|
||||
|
||||
(define ((warning-handler v) exn)
|
||||
|
|
Loading…
Reference in New Issue
Block a user