bug#48448: 'procedure-name' returns #f if name is #{}# (the empty symbol)

[Maxime Devos]

guile --version: 3.0.5
In a REPL:

(let ((#{}# (lambda () 0)) (something-else (lambda () 0)))
  (map procedure-name (list #{}# something-else)))
--> $20 (#f someting-else)

signature.asc
Description: This is a digitally signed message part