Ada 패키지의 이름 바꾸기

Question

패키지의 실제 이름과 다른 이름을 사용할 수 있습니까? 나는 아래의 프라그 마를 사용하지만

package Parent_With_Very_Long_Name is end Parent_with_Very_Long_Name; 
... 
package Parent_With_Very_Long_Name.Child is 
    pragma Source_File_Name_Project("parent-child.ads"); 
end Parent_With_Very_Long_Name.Child; 

"프라 그마 source_file_name_project 인수가 잘못된 식별자가"와 같은

• Source_File_Name_Project
• Source_File_Name

Answer 1

에이다 소스 텍스트의 실제의 기억은 기술적으로 인 오류를 얻기 위해 노력했다 컴파일러의 구현 세부 사항.

컴파일러가 예상하는 파일 이름을 보면 GNAT (GCC-Ada)를 사용하고 있다고 생각합니다. 그래서 컴파일러가 불평하는 이유는 당신이 잘못된 구문을 사용한 적이 있다는 것입니다

project Short_File_Names is 
    package Naming is 
     for Specification ("Parent_With_Very_Long_Name.Child") 
     use "parent-child.ads"; 
    end Naming; 
end Short_File_Names; 

Answer 2

이 pragma Source_File_Name에 대한 문서는 구문이

pragma Source_File_Name (
    [Unit_Name =>] unit_NAME, 
    Spec_File_Name => STRING_LITERAL, 
    [Index => INTEGER_LITERAL]); 

pragma Source_File_Name (
    [Unit_Name =>] unit_NAME, 
    Body_File_Name => STRING_LITERAL, 
    [Index => INTEGER_LITERAL]); 

말한다 : GNAT는 프로젝트 파일의 기본 이름 지정 방식을 대체 할 수 있습니다 . 올바른 구문을 사용하여, 그

package Parent_With_Very_Long_Name.Child is 
    pragma Source_File_Name 
    (Parent_With_Very_Long_Name.Child, Spec_File_Name => "parent-child.ads"); 
end Parent_With_Very_Long_Name.Child; 

될하지만 컴파일러는 지금

parent-child.ads:2:01: incorrect placement for configuration pragma "Source_File_Name" 

이 구성 프라그의 적절한 배치는 장치 전에 말한다 :

pragma Source_File_Name 
    (Parent_With_Very_Long_Name.Child, Spec_File_Name => "parent-child.ads"); 
package Parent_With_Very_Long_Name.Child is 
end Parent_With_Very_Long_Name.Child; 

모두 아주이다 그런데 다른 유닛이 이것을 어떻게 알까요? GNAT에는 소스 기반 컴파일 모델이 있습니다. 한 가지 대답은 구성 파일에 플러그 - 마를 넣는 것입니다. 기본값은 gnat.adc입니다. 더 좋은 대답은 Jacob Sparre Andersen이 제안한대로 GNAT 프로젝트 파일과 package Naming을 사용하는 것입니다.