Fortran Extensions

This forum should be used for all code folding problems, questions or suggestions. You can also use this forum to request folding support for a new language.
Post Reply
E Programmer
Posts: 38
Joined: Thu Apr 07, 2005 7:07 pm

Fortran Extensions

Post by E Programmer »

A lot of the newer fortran languages use

.f90 or .f95 in additions to .for as language extensions.

Also there are some addtional ways to end folding options that seem to be missing
you have
DO
END DO
but
DO
ENDDO
also works

similarly
IF()THEN
END IF
works but you also need
IF()THEN
ENDIF

Another thing that works is
IF()THEN
ELSE
END IF
but not
IF()THEN
ELSE
ENDIF

If I use the format
IF()THEN
ELSE IF()THEN
ELSE IF()THEN
ELSE IF()THEN
END IF
the last ELSE IF collapses find, but the IF THEN and other ELSE IF's collapse to who knows where.

If I use the format
IF()THEN
ELSEIF()THEN
ELSEIF()THEN
ELSEIF()THEN
END IF
it works pretty good. All the ELSEIF's are not recognized as part of the structure and the entire thing collapses from IF THEN the END IF.

One work around is for me to convert all my ENDIF and ENDDO to END IF and END DO and learn to separate the words.
I rarely use ELSE IF, so this one also works.

The big thing I need is for F90 and F95 extensions to be part of FOR code.
jussij
Site Admin
Posts: 2650
Joined: Fri Aug 13, 2004 5:10 pm

Post by jussij »

Below are links to a replacement xfolder.dll that fixes these folding issuse.

To install this patch, backup the current xfolder.dll file, download the correct patch based on your current version of Zeus and replace the xfolder.dll file the one contained in the zip:Jussi
E Programmer
Posts: 38
Joined: Thu Apr 07, 2005 7:07 pm

Post by E Programmer »

The folding for fortran f90 and LUA extensions appears backwards!

Code: Select all

.  subroutine a
.     if b=c then
-     endif
-  end subroutine
So when I click on a -, zeus closes! :roll:
I'm glad you had me backup xfolder.dll! :D
jussij
Site Admin
Posts: 2650
Joined: Fri Aug 13, 2004 5:10 pm

Post by jussij »

Did you you the correct version of the xFolder.dll file :?:

Which version of Zeus are you running and which zip file did you install :?:

Jussi
E Programmer
Posts: 38
Joined: Thu Apr 07, 2005 7:07 pm

Post by E Programmer »

I am using Zeus 3.94a

In my enthusiam for your editor, I installed 3.95!

I guess that just shows that I have not reached my limit of dumb mistakes for today.

It works fine now. ... with if, endif, elseif, enddo... I'm in heaven :D
rola
Posts: 2
Joined: Fri Jan 04, 2008 7:12 am

Post by rola »

oh, I alway think elseif has no difference with else if. :oops: I maybe wrong.
Post Reply