<?xml version="1.0" encoding="UTF-8" ?>

<bugzilla version="5.2"
          urlbase="https://bugzilla.altlinux.org/"
          
          maintainer="jenya@basealt.ru"
>

    <bug>
          <bug_id>18067</bug_id>
          
          <creation_ts>2008-12-02 11:51:57 +0300</creation_ts>
          <short_desc>Неправильная компиляция FORTRAN-программы с -malign-double</short_desc>
          <delta_ts>2018-07-13 04:28:35 +0300</delta_ts>
          <reporter_accessible>1</reporter_accessible>
          <cclist_accessible>1</cclist_accessible>
          <classification_id>4</classification_id>
          <classification>Development</classification>
          <product>Sisyphus</product>
          <component>gcc4.3-fortran</component>
          <version>unstable</version>
          <rep_platform>all</rep_platform>
          <op_sys>Linux</op_sys>
          <bug_status>CLOSED</bug_status>
          <resolution>WONTFIX</resolution>
          
          
          <bug_file_loc></bug_file_loc>
          <status_whiteboard></status_whiteboard>
          <keywords></keywords>
          <priority>P2</priority>
          <bug_severity>major</bug_severity>
          <target_milestone>---</target_milestone>
          
          
          <everconfirmed>1</everconfirmed>
          <reporter name="serpiph">serpiph</reporter>
          <assigned_to name="Gleb F-Malinovskiy">glebfm</assigned_to>
          <cc>glebfm</cc>
          
          <qa_contact>qa-sisyphus</qa_contact>

      

      

      

          <comment_sort_order>oldest_to_newest</comment_sort_order>  
          <long_desc isprivate="0" >
    <commentid>82073</commentid>
    <comment_count>0</comment_count>
    <who name="serpiph">serpiph</who>
    <bug_when>2008-12-02 11:51:57 +0300</bug_when>
    <thetext>Тестовая программа:

program test
integer(4) m(20),i
character(12) a,b
open(2,access=&apos;direct&apos;,recl=100,file=&apos;test.bin&apos;)
write(2,rec=1)(m(i),i=1,20),a,b
close(2)
end

Если эту программу собрать gfortran4.3 с ключом -malign-double (gfortran -o test -malign-double test.for) и запустить, то файл test.bin создаётся размером 400Гбайт (4Гбайт*100). Если без этого ключа, то размером 100байт. В результате файлы прямого доступа разрастаются просто до неприличных размеров.
(Мой набор параметров: -O2 -pedantic -Wunderflow -Wall -fno-automatic -lpthread -funroll-all-loops -lncurses -ffast-math -march=prescott -malign-double, но убирая только последний параметр, я получаю нормальный файл.)</thetext>
  </long_desc><long_desc isprivate="0" >
    <commentid>172612</commentid>
    <comment_count>1</comment_count>
    <who name="Dmitry V. Levin">ldv</who>
    <bug_when>2018-07-13 04:28:35 +0300</bug_when>
    <thetext>На gcc7-fortran не воспроизводится, gcc4.3-fortran никто исправлять не будет.</thetext>
  </long_desc>
      
      

    </bug>

</bugzilla>