3.28. pragma Source_File_Name

Syntax
pragma Source_File_Name (
  [Unit_Name   =>] unit_NAME,
  [FNAME_DESIG =>] static_string_EXPRESSION);
FNAME_DESIG => Body_File_Name | Spec_File_Name

Use this to override the normal naming convention. It is a configuration pragma, and so has the usual applicability of configuration pragmas (i.e. it applies to either an entire partition, or to all units in a compilation, or to a single unit, depending on how it is used. unit_name is mapped to file_name_literal. The identifier for the second argument is required, and indicates whether this is the file name for the spec or for the body.