> Fine with me; that's what I had in mind.

Excellent. Here is the complete patch, I forgot to include the symtab.c
part...

2007-10-07  Pierre Muller  <muller@ics.u-strasbg.fr>

        * p-lang.h (pascal_main_name): Add declaration.
        * p-lang.c (GPC_P_INITIALIZE, GPC_MAIN_PROGRAM_NAME_1)
        (GPC_MAIN_PROGRAM_NAME_2): New constants.
        (pascal_main_name): New function.
        * symtab.c: Include p-lang.h.
        (find_main_name): ADd call to pascal_main_name.
        * Makefile.in (symtab.o): Add dependency on p-lang.h.

Needs to be tested...

-- 
Joel