diff --git a/racket/src/expander/read/config.rkt b/racket/src/expander/read/config.rkt index acb23dd1c9..64402dc3a0 100644 --- a/racket/src/expander/read/config.rkt +++ b/racket/src/expander/read/config.rkt @@ -97,7 +97,9 @@ (define (port+config->srcloc in config) (define-values (end-line end-col end-pos) (port-next-location in)) - (srcloc (read-config-source config) + (srcloc (or (read-config-source config) + (object-name in) + "UNKNOWN") (read-config-line config) (read-config-col config) (read-config-pos config)