Silverfrost Forums

Welcome to our forums

Spurious line in cross-reference listing

12 Dec 2019 11:31 #24770

When the program below is compiled with /64 /xref, the XRF file contains a spurious line.

program main
   implicit none
   integer :: itrat, kount
!-----------------------------------------------
   open(unit = 15, file = 'prg.data', status = 'old')
1  call input()
   itrat = 3
   kount = 1
2  call ephem()
3  call vmass()
   itrat = 2
   if (kount .lt. 0) then
      call print()
      go to 1
   endif
   if (itrat .eq. 1) go to 2
   if (itrat .eq. 2) go to 3
   call print()
end program main

The spurious line in the XRF file:

SUBROUTINE __save_rbp
12 Dec 2019 2:10 #24772

Thanks. I will make a note of this.

26 Feb 2020 7:09 #25018

This has now been fixed for the next release.

Please login to reply.