Search found 8 matches

by RTT
Tue Dec 06, 2016 10:51 am
Forum: Reporting a Bug
Topic: Code Folding Fortran
Replies: 10
Views: 5167

Re: Code Folding Fortran

Thank you. It is a pity it cannot be fixed. I liked better your way of fold presentation than Notepad++, which can fold the code correctly. I cannot understand your last comment that the 'Folder' does not have access to the next line. This IF folds correctly IF(((CHECK(160).AND..NOT.CHECK(334)).OR.C...
by RTT
Mon Dec 05, 2016 2:37 pm
Forum: Reporting a Bug
Topic: Code Folding Fortran
Replies: 10
Views: 5167

Re: Code Folding Fortran

Thank you. It works better, but there are still problems. In this code folding the first IF (i.e. IF(CHECK(80))THEN) folds everything and the code after the corresponding ENDIF (just before comment "C-code from here to end is lost " ) is lost. SUBROUTINE KHX20 C-----------------------------Additiona...
by RTT
Fri Dec 02, 2016 2:24 pm
Forum: Reporting a Bug
Topic: Code Folding Fortran
Replies: 10
Views: 5167

Re: Code Folding Fortran

Only the innermost IF - ENDIF block (i.e. IF(LPTP==83) ... ) folds.
It folded correctly before I use the recently cent DLL.
by RTT
Fri Dec 02, 2016 2:20 pm
Forum: Reporting a Bug
Topic: Code Folding Fortran
Replies: 10
Views: 5167

Re: Code Folding Fortran

SUBROUTINE KHX20 IF(LDEBUG>=1)THEN CALL VBSIWT IF(LDEBUG>=2)THEN CALL MTEWRT(ELXYZ ,NAXES ,LNODZ ,'ELXYZ ') IF(NTAB==1)CALL VCEWRT(ELPR ,NPRZ ,'ELPR ') CALL MTEWRT(CBF ,NCBF ,NRHS ,'CBF ') IF(LPTP==83)THEN CALL VCEWRT(ELPRW ,NPRZW ,'ELPRW ') ENDIF IF(LDBUG1<2)CALL MTEWT3(DISP ,NDF ,NDISP ,NRHSTP,'D...
by RTT
Fri Dec 02, 2016 10:59 am
Forum: Code Folding
Topic: Code Folding Fortran
Replies: 3
Views: 7606

Re: Code Folding Fortran

Thanks. With this DLL I can fold a multiline IF( )THEN block, but it does not work properly.
Everything up to the end of the file is folded
by RTT
Fri Dec 02, 2016 10:55 am
Forum: Reporting a Bug
Topic: Code Folding Fortran
Replies: 10
Views: 5167

Re: Code Folding Fortran

Thanks. With this DLL I can fold a multiline IF( )THEN block, but it does not work properly.
Everything up to the end of the file is folded
by RTT
Thu Dec 01, 2016 4:17 pm
Forum: Code Folding
Topic: Code Folding Fortran
Replies: 3
Views: 7606

Code Folding Fortran

When the IF(...) THEN statement of IF-ELSE-ENDIF block is written on more than one line it cannot be folded.
by RTT
Thu Dec 01, 2016 4:12 pm
Forum: Reporting a Bug
Topic: Code Folding Fortran
Replies: 10
Views: 5167

Code Folding Fortran

When the IF( ) statement from IF-ELSE-ENDIF block is written on more than one line it cannot be folded.