------- Comment #5 from dave dot korn dot cygwin at gmail dot com  2009-05-30 
15:38 -------
The patch in comment 4 works.

dkad...@ubik /tmp/fortran
$ ./hello-fixed.exe
 Hello World!

dkad...@ubik /tmp/fortran
$ gdb ./hello-fixed.exe
GNU gdb 6.8.0.20080328-cvs (cygwin-special)
Copyright (C) 2008 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.  Type "show copying"
and "show warranty" for details.
This GDB was configured as "i686-pc-cygwin"...
(gdb) disass main
Dump of assembler code for function main:
0x0040114d <main+0>:    push   %ebp
0x0040114e <main+1>:    mov    %esp,%ebp
0x00401150 <main+3>:    and    $0xfffffff0,%esp
0x00401153 <main+6>:    sub    $0x10,%esp
0x00401156 <main+9>:    call   0x401210 <__main>
0x0040115b <main+14>:   mov    0xc(%ebp),%eax
0x0040115e <main+17>:   mov    %eax,0x4(%esp)
0x00401162 <main+21>:   mov    0x8(%ebp),%eax
0x00401165 <main+24>:   mov    %eax,(%esp)
0x00401168 <main+27>:   call   0x402320 <*__gfortran_set_args>
0x0040116d <main+32>:   movl   $0x417b00,0x4(%esp)
0x00401175 <main+40>:   movl   $0x8,(%esp)
0x0040117c <main+47>:   call   0x4023b0 <*__gfortran_set_options>
0x00401181 <main+52>:   call   0x4010e0 <MAIN__>
0x00401186 <main+57>:   mov    $0x0,%eax
0x0040118b <main+62>:   leave
0x0040118c <main+63>:   ret
0x0040118d <main+64>:   nop
0x0040118e <main+65>:   nop
0x0040118f <main+66>:   nop
End of assembler dump.
(gdb)

I'll try a testsuite run now.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40309

Reply via email to