<html><head></head><body><div style="font-family: Verdana;font-size: 12.0px;"><div> 
<div>
<div> Hi,</div>

<div> </div>

<div>Remove the "new line" (in your code \newline, see below) between the IF and THEN statements.</div>

<div>Or else add the missing END IF statement. That should do the trick.</div>

<div> </div>

<div>HTH and regards, Daniel</div>

<div> </div>

<div name="quote" style="margin: 10px 5px 5px 10px; padding: 10px 0px 10px 10px; border-left-color: rgb(195, 217, 229); border-left-width: 2px; border-left-style: solid; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;">
<div style="margin: 0px 0px 10px;"><b>Gesendet:</b> Donnerstag, 21. August 2014 um 08:47 Uhr<br/>
<b>Von:</b> "Andreas Tille" <andreas@an3as.eu><br/>
<b>An:</b> "Debian Mentors List" <debian-mentors@lists.debian.org>, 747259@bugs.debian.org<br/>
<b>Betreff:</b> [Debichem-devel] Bug#747259: [Help] gfortran problem: Cannot assign to a named constant</div>

<div name="quoted-content">Hi,<br/>
<br/>
any idea how to resolve this gfortran problem:<br/>
<br/>
Automatic builds of abinit with gfortran 4.8.2 (as unstable uses these<br/>
days) have been failing:<br/>
<br/>
gfortran -DHAVE_CONFIG_H -I. -I../.. -I../../src/incs -I../../src/incs -I/«BUILDDIR»/abinit-7.6.3+dfsg/fallbacks/exports/include -ffree-form -J/«BUILDDIR»/abinit-7.6.3+dfsg/src/mods -g -O2 -fstack-protector --param=ssp-buffer-size=4 -c -o m_ListCdagC.o m_ListCdagC.F90<br/>
m_ListCdagC.F90:129.29:<br/>
<br/>
IF(ALLOCATED(list_1%list)) THEN \newline deallocate(list_1%list, stat=ABI_ALL<br/>
1<br/>
Error: Cannot assign to a named constant at (1)<br/>
m_ListCdagC.F90:242.29:<br/>
<br/>
IF(ALLOCATED(list_temp)) THEN \newline deallocate(list_temp, stat=ABI_ALLOC<br/>
1<br/>
Error: Cannot assign to a named constant at (1)<br/>
m_ListCdagC.F90:954.29:<br/>
<br/>
IF(ALLOCATED(list_1%list)) THEN \newline deallocate(list_1%list, stat=ABI_ALL<br/>
1<br/>
Error: Cannot assign to a named constant at (1)<br/>
make[4]: *** [m_ListCdagC.o] Error 1<br/>
make[4]: Leaving directory `/«BUILDDIR»/abinit-7.6.3+dfsg/src/62_ctqmc'<br/>
<br/>
<br/>
<br/>
Thanks for any hint<br/>
<br/>
Andreas.<br/>
<br/>
--<br/>
<a href="http://fam-tille.de" target="_blank">http://fam-tille.de</a><br/>
<br/>
_______________________________________________<br/>
Debichem-devel mailing list<br/>
Debichem-devel@lists.alioth.debian.org<br/>
<a href="http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/debichem-devel" target="_blank">http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/debichem-devel</a></div>
</div>
</div>
</div></div></body></html>