Searched refs:Kernel_Proc (Results 1 – 4 of 4) sorted by relevance
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/ada/ |
H A D | sem_prag.adb | 14802 Kernel_Proc : Entity_Id; variable 14814 Kernel_Proc := Entity (Arg_Node); 14815 Pack_Id := Scope (Kernel_Proc); 14817 if Ekind (Kernel_Proc) /= E_Procedure then 14818 Error_Msg_NE ("& must be a procedure", N, Kernel_Proc); 14824 ("& must reside in a library-level package", N, Kernel_Proc); 14827 Set_Is_CUDA_Kernel (Kernel_Proc); 14828 Add_CUDA_Kernel (Pack_Id, Kernel_Proc);
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/ada/ |
H A D | sem_prag.adb | 15111 Kernel_Proc : Entity_Id; variable 15122 Kernel_Proc := Entity (Arg_Node); 15123 Pack_Id := Scope (Kernel_Proc); 15125 if Ekind (Kernel_Proc) /= E_Procedure then 15126 Error_Msg_NE ("& must be a procedure", N, Kernel_Proc); 15132 ("& must reside in a library-level package", N, Kernel_Proc); 15135 Set_Is_CUDA_Kernel (Kernel_Proc); 15136 Add_CUDA_Kernel (Pack_Id, Kernel_Proc);
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/ada/ |
H A D | sem_prag.adb | 14802 Kernel_Proc : Entity_Id; variable 14814 Kernel_Proc := Entity (Arg_Node); 14815 Pack_Id := Scope (Kernel_Proc); 14817 if Ekind (Kernel_Proc) /= E_Procedure then 14818 Error_Msg_NE ("& must be a procedure", N, Kernel_Proc); 14824 ("& must reside in a library-level package", N, Kernel_Proc); 14827 Set_Is_CUDA_Kernel (Kernel_Proc); 14828 Add_CUDA_Kernel (Pack_Id, Kernel_Proc);
|
/dports/lang/gcc11/gcc-11.2.0/gcc/ada/ |
H A D | sem_prag.adb | 14802 Kernel_Proc : Entity_Id; variable 14814 Kernel_Proc := Entity (Arg_Node); 14815 Pack_Id := Scope (Kernel_Proc); 14817 if Ekind (Kernel_Proc) /= E_Procedure then 14818 Error_Msg_NE ("& must be a procedure", N, Kernel_Proc); 14824 ("& must reside in a library-level package", N, Kernel_Proc); 14827 Set_Is_CUDA_Kernel (Kernel_Proc); 14828 Add_CUDA_Kernel (Pack_Id, Kernel_Proc);
|