Uncaught compiler error with duplicate doc string

[Paul F. Dietz]

(compile nil '(lambda () "foo" "foo" nil))

===>

duplicate doc string "foo"
   [Condition of type SIMPLE-ERROR]
[...]
Backtrace:
  0: (SB-INT:PARSE-BODY ("foo" "foo" NIL) T NIL)
  1: (SB-C::IR1-CONVERT-LAMBDA (LAMBDA NIL "foo" "foo" NIL) :SOURCE-NAME SB-C::.ANONYMOUS. :DEBUG-NAME (LAMBDA NIL) :MAYBE-ADD-DEBUG-CATCH T :SYSTEM-LAMBDA NIL)
[...]

[Paul F. Dietz (paul-f-dietz)]

(compile nil '(lambda () "foo" "foo")) is fine, because the second "foo" is not interpreted as a docstring.