Please login or register.

Login with username, password and session length
gfx gfx
1619 Posts in 535 Topics by 781 Members - Latest Member: chekyl43 January 27, 2023, 03:13:52 PM
gfx* Home | Help | Search | Login | Register | gfx
Absoft User Forum  |  Support  |  Windows  |  Segmentation Fault in Front End

Author Topic: Segmentation Fault in Front End  (Read 1934 times)


  • Jr. Member
  • **
  • Posts: 76
Segmentation Fault in Front End
« on: March 16, 2020, 01:49:32 PM »
The following subprogram cannot be compiled with Absoft Fortran 20.0:
Code: [Select]
    module sindeg
       real :: deg2rad = 1.745329e-2
       double precision :: ddeg2rad = 1.74532925199433d-2

       interface sind
          module procedure sind
          module procedure dsind
       end interface


       real function sind(x)
          real :: x

          sind = sin(x*deg2rad)
       end function sind

       double precision function dsind(x)
          double precision :: x

          dsind = sin(x*ddeg2rad)
       end function dsind

    end module sindeg

« Last Edit: March 16, 2020, 02:28:01 PM by mecej4 »


  • Administrator
  • Sr. Member
  • *****
  • Posts: 333
Re: Segmentation Fault in Front End
« Reply #1 on: April 13, 2020, 03:33:12 PM »
This issue has been duplicated by Absoft Technical Support and will be addressed in the next service pack for Pro Fortran 20.0.  The issue seems to be related to using the name of an existing intrinsic function, in this case SIND, as both a generic procedure and as a specific procedure. In the example presented above, changing the name of the specific procedure SIND to SIND1 allows the code to compile:
     real function sind1(x)
          real :: x
          sind1 = sin(x*deg2rad)
       end function sind1

Absoft User Forum  |  Support  |  Windows  |  Segmentation Fault in Front End

gfx gfx
Powered by MySQL Powered by PHP Valid XHTML 1.0! Valid CSS!