- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I am in the final stages of compiling legacy f90/95 code with the latest version of the IVF compiler in Visual Studio 2015. The code has successfully compiled, linked and run with two other compilers. The offending compilation unit is a module that is structured as follows:
module mod1 implicit none ... contains function CaseText() result(Text) character(127) :: Text ... end function CaseText subroutine Sub1(...) ... (variable declarations) character(127) :: CaseMsg ... (Fortran statements) CaseMsg(1:) = CaseText() !Statement A ... end subroutine Sub1 subroutine Sub2(...) ... (variable declarations) character(127) :: CaseMsg CaseMsg(1:) = CaseText() !Statement B ... end subroutine Sub2 end module mod1
Upon compilation, the following error messages are issued relating to Statement B, but not Statement A:
error #6404: This name does not have a type, and must have an explicit type. [CASETEXT]
error #6054: A CHARACTER data type is required in this context. [CASETEXT]
Furthermore, references to the function CaseText in modules other than Mod1 also flag no errors. I'm thinking this may have something to do with the differences between internal, external and module procedures, but I'm perplexed as to why the error is flagged for Statement B but not Statement A. If I simply comment out Statement B, no errors are flagged. Can anyone educate me on what is going on here? Thanks for any help.
Link Copied

- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page