forums.silverfrost.com Forum Index forums.silverfrost.com
Welcome to the Silverfrost forums
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Plato update

 
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> Plato
View previous topic :: View next topic  
Author Message
PaulLaidler
Site Admin


Joined: 21 Feb 2005
Posts: 6325
Location: Salford, UK

PostPosted: Mon Apr 13, 2020 5:31 pm    Post subject: Plato update Reply with quote

A new version of Plato is now available. This includes an major new "auto-compilation" feature for Fortran programmers.

When writing new code, Plato now automatically communicates with the FTN95 compiler which reports back programming errors in the code as you type.

Users of FTN95 v8.61 can download the new Plato together with the associated updated FTN95 via the following link...

https://www.dropbox.com/s/td3j1ggw1a676yt/Update.zip?dl=0

A YouTube demonstration video is provided here...

https://youtu.be/LCn4AF44hpw
Back to top
View user's profile Send private message AIM Address
John-Silver



Joined: 30 Jul 2013
Posts: 1319
Location: Aerospace Valley

PostPosted: Tue Apr 14, 2020 2:18 pm    Post subject: Reply with quote

will these new files work equally to update the personal version ?
_________________
''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... Smile "
Back to top
View user's profile Send private message
John-Silver



Joined: 30 Jul 2013
Posts: 1319
Location: Aerospace Valley

PostPosted: Tue Apr 14, 2020 2:43 pm    Post subject: Reply with quote

PS
just a suggestion - as well as here maybe you should include this 'release' in the announcements section - simply bcause people who don't use PLTO might never open the Plato form posts !

Thus defeating one of your main objectives, which is to get more people onboard using it (as you encourage to do at the end of your video).

Just a thought to grab the attention of as many fish as possible.
_________________
''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... Smile "
Back to top
View user's profile Send private message
PaulLaidler
Site Admin


Joined: 21 Feb 2005
Posts: 6325
Location: Salford, UK

PostPosted: Tue Apr 14, 2020 4:09 pm    Post subject: Reply with quote

These new versions of Plato and FTN95 are expected to be compatible with FTN95 v8.61 but it is always safer to keep a backup of the earlier versions.
Back to top
View user's profile Send private message AIM Address
JohnCampbell



Joined: 16 Feb 2006
Posts: 2172
Location: Sydney

PostPosted: Thu Apr 16, 2020 8:40 am    Post subject: Reply with quote

Paul,

Thanks very much for these 8.62 and 5.30 updates to 8.61.

The video is a very welcome addition to explain the updates. Very helpful.

I copied the ftn95_8.61 to ftn95_8.62 and all appears to be working ok.

It would be good if this info was also placed in announcements, rather than hidden in this thread, as this looks like a welcome update.

I tried the bracket matching, but did not highlight at first. ( the enclosing lines did show the bracket extent on 1 line )
After checking the matching bracket colour and changed from magenta to blue all worked well.
( Tools > Settings > Environment > Fonts and Colours > Bracket matching )
I now have brackets red and highlighted brackets in blue.
I could not see where Fortran brackets were set to Red ?
The following highlighted brackets over multiple lines.
Code:
    real a0, a1, a2, a3, a4, aa, x
    aa =  ( ( (a4 *x   &
             + a3)*x   &
             + a2)*x   &
             + a1)*x   &
             + a0


With Do .. End Do matching, underline is blue and DO is blue. This works very well also. Can the underline be a different colour ?
( just asking if this is changeable; not a request to change! )

With IF .. ELSE IF .. ELSE .. END IF ; could these be investigated for highlighting ?
( an indication if simple change, as SELECT CASE will surely be on the next list ! )

Thanks very much for this update and for the informative video, much appreciated.

John
Back to top
View user's profile Send private message
PaulLaidler
Site Admin


Joined: 21 Feb 2005
Posts: 6325
Location: Salford, UK

PostPosted: Thu Apr 16, 2020 9:58 am    Post subject: Reply with quote

John

Thanks for the feedback.

An underline is part of the font and has to be the same colour as the character.

Only the beginning and end of an IF is highlighted. ELSE and ELSE IF are much more tricky.

I thought that I had included SELECT CASE but maybe not.
Back to top
View user's profile Send private message AIM Address
JohnCampbell



Joined: 16 Feb 2006
Posts: 2172
Location: Sydney

PostPosted: Thu Apr 16, 2020 11:53 am    Post subject: Reply with quote

Paul,

I opened another .f90 file and it did highlight the IF, THEN and END IF and also a DO END DO loop and matching brackets.

However the short code example below does not highlight the IF block.
It also sometimes does not highlight the DO block, although I can't confirm this response sequence.
It does highlight the matching brackets. (uninitialised variables warning on Compile (Ctrl+F7))
It is a nonsense code, that was testing statement functions. Not sure if this is a problem here.
I have two files open, with the file below as tab 1.
I am selecting Release Win32.
Code:
subroutine extsub
  implicit none
  integer ij(5), kk
  !
  call intsub(ij, kk)
  print *,kk
  return
 
  contains
    subroutine intsub(i, j)
    implicit none
    integer, intent(in) :: i(5)
    integer, intent(out) :: j
    integer i1,i2,i3,i4,i5,mean,k
    real a0, a1, a2, a3, a4, aa, x

    mean(i1,i2,i3,i4,i5) = (i1+i2+i3+i4+i5)/5    ! statement function

    if ( i(1) == 0 ) then                        ! if statement
      j = 0
      do k = 1, size(i)
        j = j + i(k)
      end do
      j = j / size(i)
    else
      j = mean(i(1),i(2),i(3),i(4),i(5))
    end if
    aa =  ( ( (a4 *x   &
             + a3)*x   &
             + a2)*x   &
             + a1)*x   &
             + a0
    return
    end subroutine intsub
  end subroutine extsub

! program test
!  call extsub
! end program test

Can you reproduce my response ?
Back to top
View user's profile Send private message
PaulLaidler
Site Admin


Joined: 21 Feb 2005
Posts: 6325
Location: Salford, UK

PostPosted: Thu Apr 16, 2020 12:03 pm    Post subject: Reply with quote

It does not seem to like the comment on the IF line. But if you remove it and put it back, it's OK.

I will make a note but it could be a while before I get to it.
Back to top
View user's profile Send private message AIM Address
JohnCampbell



Joined: 16 Feb 2006
Posts: 2172
Location: Sydney

PostPosted: Thu Apr 16, 2020 12:09 pm    Post subject: Reply with quote

Paul,

Glad to know I have not messed up the install.
I can certainly live with this improved version of Plato until your fix.

Thanks for this,

John
Back to top
View user's profile Send private message
Kenneth_Smith



Joined: 18 May 2012
Posts: 268
Location: Hamilton, Lanarkshire, Scotland.

PostPosted: Thu Apr 16, 2020 12:46 pm    Post subject: Reply with quote

Excellent work Paul, your video highlighted some good new features and a few old ones of which I was not aware. I know making videos is time consuming, but be assured your effort is appreciated. Ken
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> Plato All times are GMT + 1 Hour
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group