PGI User Forum
 SearchSearch   MemberlistMemberlist     RegisterRegister   ProfileProfile    Log inLog in 

Free OpenACC Course

Cann't use implicit none in CUDA emulation mode?

 
Post new topic   Reply to topic    PGI User Forum Forum Index -> Programming and Compiling
View previous topic :: View next topic  
Author Message
Qing HOU



Joined: 29 Nov 2009
Posts: 4

PostPosted: Thu Dec 31, 2009 3:23 am    Post subject: Cann't use implicit none in CUDA emulation mode? Reply with quote

If "CUDA Fortran Emulation" is NO, the code below can be successfully complied. If "CUDA Fortran Emulation" being YES, I got the error message:
error S0038 : Symbol, .i0002, has not been explicitly declared
error S0038 : Symbol, .i0003, has not been explicitly declared
error S0038 : Symbol, .i0004, has not been explicitly declared

If I delete the statement "implicit none", the code can be successfully compiled again.

Code:

subroutine TEST(N, A) 
 use CUDAFOR                                                       
    implicit none
    integer::N
    real, dimension(:)::A
    real, device, dimension(:), allocatable::dA
    type(dim3) :: blocks
    type(dim3) :: threads
   
     allocate(dA(N))
     dA = A
     call DEV_TEST<<<blocks,threads>>>(N, dA) 
     return                                                                   
end subroutine TEST
Back to top
View user's profile
mkcolg



Joined: 30 Jun 2004
Posts: 6660
Location: The Portland Group Inc.

PostPosted: Mon Jan 04, 2010 11:43 am    Post subject: Reply with quote

Hi Qing HOU

This is a known issue (TPR#16391) that will be fixed in the 10.1 release (expected to be available later this week).

Thanks,
Mat
Back to top
View user's profile
Display posts from previous:   
Post new topic   Reply to topic    PGI User Forum Forum Index -> Programming and Compiling All times are GMT - 7 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © phpBB Group