Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.

CHDIR

JohnNichols
Valued Contributor III
305 Views
I wrote this as a simple program and it works fine - although it prefere IFPORT - now as a routine in WLF I get an access code violaton on run 

​Life is a long beach and the life guard is always at the other end
    
!      ****************************************************************
!     
      subroutine chdirA(i)
!
!      ****************************************************************
      
      use IFPOSIX
      implicit none


      CHARACTER(len=255) :: path
      integer i,ilen, ierror
    
    
      CALL PXFGETCWD (path,ilen,ierror)
      WRITE(*,*) TRIM(path)
      call PXFCHDIR("C:\",3,i)
      call PXFCHDIR("users\macne\documents\Visual Studio 2013\Projects\Program070 - Beams\Lothurr",76,i)
       write(*,*)i
       CALL PXFGETCWD (path,ilen,ierror)
       WRITE(*,*) TRIM(path)
       return 
       end subroutine

 

0 Kudos
2 Replies
JohnNichols
Valued Contributor III
305 Views

It crashed in WULF as a subroutine - with access code violation at the first chdir

0 Kudos
Steven_L_Intel1
Employee
305 Views

It seems evident to me that your WULF program has issues with stack corruption. I doubt this CHDIR routine is relevant. I can reproduce the stack corruption (from your other thread) but it may take me a while to track down.

0 Kudos
Reply