<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom"><channel><title>Recent changes to 10: Error in function gnuplot_load</title><link>https://sourceforge.net/p/gnuplotfortran/bugs/10/</link><description>Recent changes to 10: Error in function gnuplot_load</description><atom:link href="https://sourceforge.net/p/gnuplotfortran/bugs/10/feed.rss" rel="self"/><language>en</language><lastBuildDate>Mon, 30 Jul 2012 14:27:30 -0000</lastBuildDate><atom:link href="https://sourceforge.net/p/gnuplotfortran/bugs/10/feed.rss" rel="self" type="application/rss+xml"/><item><title>Error in function gnuplot_load</title><link>https://sourceforge.net/p/gnuplotfortran/bugs/10/</link><description>&lt;div class="markdown_content"&gt;&lt;p&gt;Hi, I think I have found an error in the gnuplot_fortran95.f90 file at lines 1374/1381 (function gnuplot_load) in the conditions of the if statements. &lt;br /&gt;
This is the original code:&lt;/p&gt;
&lt;p&gt;....&lt;br /&gt;
ierror=fortran_access(trim(loadfile),0)&lt;br /&gt;
if(status.ne.0) then&lt;br /&gt;
status=-1&lt;br /&gt;
call assert_error('gnuplot_load','cannot find the specified load file '//trim(loadfile),status)&lt;br /&gt;
return&lt;br /&gt;
end if&lt;/p&gt;
&lt;p&gt;ierror=fortran_access(trim(loadfile),4)&lt;br /&gt;
if(status.ne.0) then&lt;br /&gt;
status=-2&lt;br /&gt;
call assert_error('gnuplot_load','you do not have read permissions for the specified load&amp;amp;&lt;br /&gt;
&amp;amp;file '//trim(loadfile),status)&lt;br /&gt;
return&lt;br /&gt;
end if&lt;br /&gt;
....&lt;/p&gt;
&lt;p&gt;I think that the conditions in the if statement should be: &lt;br /&gt;
if(ierror.ne.0) then ... &lt;br /&gt;
in both of the cases.&lt;/p&gt;
&lt;p&gt;I've changed the code and compiled it with gfortran 4.6 and it works well!&lt;/p&gt;
&lt;p&gt;I hope this could help someone.&lt;/p&gt;&lt;/div&gt;</description><dc:creator xmlns:dc="http://purl.org/dc/elements/1.1/">Alessio Siravo</dc:creator><pubDate>Mon, 30 Jul 2012 14:27:30 -0000</pubDate><guid>https://sourceforge.netc9e8977d1b056abff7c0dccffd0c0b457518a37f</guid></item></channel></rss>