Modules/FortranCInterface/symbol.c.in (4 lines of code) (raw):

const char* @symbol@(void) { return "INFO:symbol[@symbol@]"; }