2005-10-12 Joe Buck <Joe.Buck@synopsys.com>
[official-gcc.git] / gcc / fortran / gfortran.texi
bloba4ecee3d9a0a792fbb2b7d83174a1d0240da2e36
1 \input texinfo  @c -*-texinfo-*-
2 @c %**start of header
3 @setfilename gfortran.info
4 @set copyrights-gfortran 1999-2005
6 @include gcc-common.texi
8 @settitle The GNU Fortran 95 Compiler
10 @c Create a separate index for command line options
11 @defcodeindex op
12 @c Merge the standard indexes into a single one.
13 @syncodeindex fn cp
14 @syncodeindex vr cp
15 @syncodeindex ky cp
16 @syncodeindex pg cp
17 @syncodeindex tp cp
19 @c %**end of header
21 @c Use with @@smallbook.
23 @c %** start of document
25 @c Cause even numbered pages to be printed on the left hand side of
26 @c the page and odd numbered pages to be printed on the right hand
27 @c side of the page.  Using this, you can print on both sides of a
28 @c sheet of paper and have the text on the same part of the sheet.
30 @c The text on right hand pages is pushed towards the right hand
31 @c margin and the text on left hand pages is pushed toward the left
32 @c hand margin.
33 @c (To provide the reverse effect, set bindingoffset to -0.75in.)
35 @c @tex
36 @c \global\bindingoffset=0.75in
37 @c \global\normaloffset =0.75in
38 @c @end tex
40 @copying
41 Copyright @copyright{} @value{copyrights-gfortran} Free Software Foundation, Inc.
43 Permission is granted to copy, distribute and/or modify this document
44 under the terms of the GNU Free Documentation License, Version 1.1 or
45 any later version published by the Free Software Foundation; with the
46 Invariant Sections being ``GNU General Public License'' and ``Funding
47 Free Software'', the Front-Cover
48 texts being (a) (see below), and with the Back-Cover Texts being (b)
49 (see below).  A copy of the license is included in the section entitled
50 ``GNU Free Documentation License''.
52 (a) The FSF's Front-Cover Text is:
54      A GNU Manual
56 (b) The FSF's Back-Cover Text is:
58      You have freedom to copy and modify this GNU Manual, like GNU
59      software.  Copies published by the Free Software Foundation raise
60      funds for GNU development.
61 @end copying
63 @ifinfo
64 @dircategory Programming
65 @direntry
66 * gfortran: (gfortran).                  The GNU Fortran 95 Compiler.
67 @end direntry
68 This file documents the use and the internals of
69 the GNU Fortran 95 compiler, (@command{gfortran}).
71 Published by the Free Software Foundation
72 51 Franklin Street, Fifth Floor
73 Boston, MA 02110-1301 USA
75 @insertcopying
76 @end ifinfo
78 Contributed by Steven Bosscher (@email{s.bosscher@@gcc.gnu.org}).
80 @setchapternewpage odd
81 @titlepage
82 @title Using GNU Fortran 95
83 @sp 2
84 @center Steven Bosscher
85 @page
86 @vskip 0pt plus 1filll
87 For the @value{version-GCC} Version*
88 @sp 1
89 Published by the Free Software Foundation @*
90 51 Franklin Street, Fifth Floor@*
91 Boston, MA 02110-1301, USA@*
92 @c Last printed ??ber, 19??.@*
93 @c Printed copies are available for $? each.@*
94 @c ISBN ???
95 @sp 1
96 @insertcopying
97 @end titlepage
98 @summarycontents
99 @contents
100 @page
102 @node Top, Copying,, (DIR)
103 @top Introduction
104 @cindex Introduction
106 This manual documents the use of @command{gfortran}, 
107 the GNU Fortran 95 compiler. You can find in this manual how to invoke
108 @command{gfortran}, as well as its features and incompatibilities.
110 @ifset DEVELOPMENT
111 @emph{Warning:} This document, and the compiler it describes, are still
112 under development.  While efforts are made to keep it up-to-date, it might
113 not accurately reflect the status of the most recent @command{gfortran}.
114 @end ifset
116 @comment
117 @comment  When you add a new menu item, please keep the right hand
118 @comment  aligned to the same column.  Do not use tabs.  This provides
119 @comment  better formatting.
120 @comment
121 @menu
122 * Copying::              GNU General Public License says
123                          how you can copy and share GNU Fortran.
124 * GNU Free Documentation License::
125                          How you can copy and share this manual.
126 * Funding::              How to help assure continued work for free software.
127 * Getting Started::      What you should know about @command{gfortran}.
128 * GFORTRAN and GCC::     You can compile Fortran, C, or other programs.
129 * GFORTRAN and G77::     Why we chose to start from scratch.
130 * Invoking GFORTRAN::    Command options supported by @command{gfortran}.
131 * Project Status::       Status of @command{gfortran}, roadmap, proposed extensions.
132 * Contributing::         How you can help.
133 * Standards::            Standards supported by @command{gfortran}
134 * Extensions::           Language extensions implemented by @command{gfortran}
135 * Intrinsic Procedures:: Intrinsic procedures supported by @command{gfortran}
136 * Index::                Index of this documentation.
137 @end menu
141 @c ---------------------------------------------------------------------
142 @c GNU General Public License
143 @c ---------------------------------------------------------------------
145 @include gpl.texi
149 @c ---------------------------------------------------------------------
150 @c GNU Free Documentation License
151 @c ---------------------------------------------------------------------
153 @include fdl.texi
157 @c ---------------------------------------------------------------------
158 @c Funding Free Software
159 @c ---------------------------------------------------------------------
161 @include funding.texi
165 @c ---------------------------------------------------------------------
166 @c Getting Started
167 @c ---------------------------------------------------------------------
169 @node Getting Started
170 @chapter Getting Started
172 Gfortran is the GNU Fortran 95 compiler front end,
173 designed initially as a free replacement for,
174 or alternative to, the unix @command{f95} command;
175 @command{gfortran} is the command you'll use to invoke the compiler.
177 Gfortran is still in an early state of development.
178 @command{gfortran} can generate code for most constructs and expressions,
179 but much work remains to be done.
181 When @command{gfortran} is finished,
182 it will do everything you expect from any decent compiler: 
184 @itemize @bullet
185 @item
186 Read a user's program,
187 stored in a file and containing instructions written
188 in Fortran 77, Fortran 90 or Fortran 95.
189 This file contains @dfn{source code}.
191 @item
192 Translate the user's program into instructions a computer
193 can carry out more quickly than it takes to translate the
194 instructions in the first
195 place.  The result after compilation of a program is
196 @dfn{machine code},
197 code designed to be efficiently translated and processed
198 by a machine such as your computer.
199 Humans usually aren't as good writing machine code
200 as they are at writing Fortran (or C++, Ada, or Java),
201 because is easy to make tiny mistakes writing machine code.
203 @item
204 Provide the user with information about the reasons why
205 the compiler is unable to create a binary from the source code.
206 Usually this will be the case if the source code is flawed.
207 When writing Fortran, it is easy to make big mistakes.
208 The Fortran 90 requires that the compiler can point out
209 mistakes to the user.
210 An incorrect usage of the language causes an @dfn{error message}.
212 The compiler will also attempt to diagnose cases where the
213 user's program contains a correct usage of the language,
214 but instructs the computer to do something questionable.
215 This kind of diagnostics message is called a @dfn{warning message}.
217 @item
218 Provide optional information about the translation passes
219 from the source code to machine code.
220 This can help a user of the compiler to find the cause of
221 certain bugs which may not be obvious in the source code,
222 but may be more easily found at a lower level compiler output.
223 It also helps developers to find bugs in the compiler itself.
225 @item
226 Provide information in the generated machine code that can
227 make it easier to find bugs in the program (using a debugging tool,
228 called a @dfn{debugger}, such as the GNU Debugger @command{gdb}). 
230 @item
231 Locate and gather machine code already generated to
232 perform actions requested by statements in the user's program.
233 This machine code is organized into @dfn{modules} and is located
234 and @dfn{linked} to the user program. 
235 @end itemize
237 Gfortran consists of several components:
239 @itemize @bullet
240 @item
241 A version of the @command{gcc} command
242 (which also might be installed as the system's @command{cc} command)
243 that also understands and accepts Fortran source code.
244 The @command{gcc} command is the @dfn{driver} program for
245 all the languages in the GNU Compiler Collection (GCC);
246 With @command{gcc},
247 you can compile the source code of any language for
248 which a front end is available in GCC.
250 @item
251 The @command{gfortran} command itself,
252 which also might be installed as the
253 system's @command{f95} command.
254 @command{gfortran} is just another driver program,
255 but specifically for the Fortran 95 compiler only.
256 The difference with @command{gcc} is that @command{gfortran}
257 will automatically link the correct libraries to your program.
259 @item
260 A collection of run-time libraries.
261 These libraries contain the machine code needed to support
262 capabilities of the Fortran language that are not directly
263 provided by the machine code generated by the
264 @command{gfortran} compilation phase,
265 such as intrinsic functions and subroutines,
266 and routines for interaction with files and the operating system.
267 @c and mechanisms to spawn,
268 @c unleash and pause threads in parallelized code.
270 @item
271 The Fortran compiler itself, (@command{f951}).
272 This is the gfortran parser and code generator,
273 linked to and interfaced with the GCC backend library.
274 @command{f951} ``translates'' the source code to
275 assembler code.  You would typically not use this
276 program directly;
277 instead, the @command{gcc} or @command{gfortran} driver
278 programs will call it for you.
279 @end itemize
283 @c ---------------------------------------------------------------------
284 @c GFORTRAN and GCC
285 @c ---------------------------------------------------------------------
287 @node GFORTRAN and GCC
288 @chapter GFORTRAN and GCC
289 @cindex GNU Compiler Collection
291 GCC used to be the GNU ``C'' Compiler,
292 but is now known as the @dfn{GNU Compiler Collection}.
293 GCC provides the GNU system with a very versatile
294 compiler middle end (shared optimization passes),
295 and back ends (code generators) for many different
296 computer architectures and operating systems.
297 The code of the middle end and back end are shared by all
298 compiler front ends that are in the GNU Compiler Collection.
300 A GCC front end is essentially a source code parser
301 and an intermediate code generator.  The code generator translates the
302 semantics of the source code into a language independent form called
303 @dfn{GENERIC}.
305 The parser takes a source file written in a
306 particular computer language, reads and parses it,
307 and tries to make sure that the source code conforms to
308 the language rules.
309 Once the correctness of a program has been established,
310 the compiler will build a data structure known as the
311 @dfn{Abstract Syntax tree},
312 or just @dfn{AST} or ``tree'' for short.
313 This data structure represents the whole program
314 or a subroutine or a function.
315 The ``tree'' is passed to the GCC middle end,
316 which will perform optimization passes on it.  The optimized AST is then 
317 handed off too the back end which assembles the program unit.
319 Different phases in this translation process can be,
320 and in fact @emph{are} merged in many compiler front ends.
321 GNU Fortran 95 has a strict separation between the
322 parser and code generator.
324 The goal of the gfortran project is to build a new front end for GCC.
325 Specifically, a Fortran 95 front end.
326 In a non-gfortran installation,
327 @command{gcc} will not be able to compile Fortran 95 source code
328 (only the ``C'' front end has to be compiled if you want to build GCC,
329 all other languages are optional).
330 If you build GCC with gfortran, @command{gcc} will recognize
331 @file{.f/.f90/.f95} source files and accepts Fortran 95 specific
332 command line options.
336 @c ---------------------------------------------------------------------
337 @c GFORTRAN and G77
338 @c ---------------------------------------------------------------------
340 @node GFORTRAN and G77
341 @chapter GFORTRAN and G77
342 @cindex Fortran 77
343 @cindex G77
345 Why do we write a compiler front end from scratch? 
346 There's a fine Fortran 77 compiler in the
347 GNU Compiler Collection that accepts some features
348 of the Fortran 90 standard as extensions.
349 Why not start from there and revamp it?
351 One of the reasons is that Craig Burley, the author of G77,
352 has decided to stop working on the G77 front end.
353 On @uref{http://world.std.com/~burley/g77-why.html,
354 Craig explains the reasons for his decision to stop working on G77}
355 in one of the pages in his homepage.
356 Among the reasons is a lack of interest in improvements to
357 @command{g77}.
358 Users appear to be quite satisfied with @command{g77} as it is.
359 While @command{g77} is still being maintained (by Toon Moene),
360 it is unlikely that sufficient people will be willing
361 to completely rewrite the existing code. 
363 But there are other reasons to start from scratch.
364 Many people, including Craig Burley,
365 no longer agreed with certain design decisions in the G77 front end.
366 Also, the interface of @command{g77} to the back end is written in
367 a style which is confusing and not up to date on recommended practice.
368 In fact, a full rewrite had already been planned for GCC 3.0.
370 When Craig decided to stop,
371 it just seemed to be a better idea to start a new project from scratch,
372 because it was expected to be easier to maintain code we
373 develop ourselves than to do a major overhaul of @command{g77} first,
374 and then build a Fortran 95 compiler out of it.
376 @include invoke.texi
378 @c ---------------------------------------------------------------------
379 @c Project Status
380 @c ---------------------------------------------------------------------
382 @node Project Status
383 @chapter Project Status
385 @quotation
386 As soon as gfortran can parse all of the statements correctly,
387 it will be in the ``larva'' state.
388 When we generate code, the ``puppa'' state.
389 When gfortran is done,
390 we'll see if it will be a beautiful butterfly,
391 or just a big bug....
393 --Andy Vaught, April 2000
394 @end quotation
396 The start of the GNU Fortran 95 project was announced on
397 the GCC homepage in March 18, 2000
398 (even though Andy had already been working on it for a while,
399 of course).
401 Gfortran is currently reaching the stage where is is able to compile real
402 world programs.  However it is still under development and has many rough
403 edges.
405 @menu
406 * Compiler Status::
407 * Library Status::
408 * Proposed Extensions::
409 @end menu
411 @node Compiler Status
412 @section Compiler Status
414 @table @emph
415 @item Front end
416 This is the part of gfortran which parses a source file, verifies that it
417 is valid Fortran 95, performs compile time replacement of constants
418 (PARAMETER variables) and reads and generate module files. This is
419 almost complete. Every Fortran 95 source should be accepted, and most
420 none-Fortran 95 source should be rejected. If you find a source file where
421 this is not true, please tell us. You can use the -fsyntax-only switch to
422 make gfortran quit after running the front end, effectively reducing it to
423 a syntax checker.
425 @item Middle end interface
426 These are the parts of gfortran that take the parse tree generated by the
427 front end and translate it to the GENERIC form required by the GCC back
428 end. Work is ongoing in these parts of gfortran, but a large part has
429 already been completed.
430 @end table
432 @node Library Status
433 @section Library Status
435 Some intrinsic functions map directly to library functions, and in most
436 cases the name of the library function used depends on the type of the
437 arguments.  For some intrinsics we generate inline code, and for others,
438 such as sin, cos and sqrt, we rely on the backend to use special
439 instructions in the floating point unit of the CPU if available, or to
440 fall back to a call to libm if these are not available.
442 Implementation of some non-elemental intrinsic functions (eg. DOT_PRODUCT,
443 AVERAGE) is not yet optimal. This is hard because we have to make decisions
444 whether to use inline code (good for small arrays as no function call
445 overhead occurs) or generate function calls (good for large arrays as it
446 allows use of hand-optimized assembly routines, SIMD instructions, etc.)
448 The IO library is still under development.  The following features should be
449 usable for real programs:
451 @itemize @minus
452 @item List directed
453 @item Unformatted sequential
454 @end itemize
456 Usable with bugs:
458 @itemize @minus
459 @item Formatted sequential ('T' edit descriptor, and others)
460 @end itemize
462 Not recommended:
464 @itemize @minus
465 @item Unformatted direct access
466 @item Formatted direct access
467 @end itemize
469 Many Fortran programs only use a small subset of the available IO
470 capabilities, so your mileage may vary.
472 @node Proposed Extensions
473 @section Proposed Extensions
475 Here's a list of proposed extensions for @command{gfortran}, in no particular
476 order.  Most of these are necessary to be fully compatible with
477 existing Fortran compilers, but they are not part of the official
478 J3 Fortran 95 standard.
480 @subsection Compiler extensions: 
481 @itemize @bullet
482 @item
483 Flag for defining the kind number for default logicals.
485 @item
486 User-specified alignment rules for structures.
487 @item
488 Flag to generate @code{Makefile} info.
490 @item
491 Automatically extend single precision constants to double.
493 @item
494 Cray pointers (this was high on the @command{g77} wishlist).
496 @item
497 Compile code that conserves memory by dynamically allocating common and
498 module storage either on stack or heap.
500 @item
501 Flag to cause the compiler to distinguish between upper and lower case
502 names.  The Fortran 95 standard does not distinguish them.
504 @item
505 Compile flag to generate code for array conformance checking (suggest -CC).
507 @item
508 User control of symbol names (underscores, etc).
510 @item
511 Compile setting for maximum size of stack frame size before spilling
512 parts to static or heap.
514 @item
515 Flag to force local variables into static space.
517 @item
518 Flag to force local variables onto stack.
520 @item
521 Flag to compile lines beginning with ``D''.
523 @item
524 Flag to ignore lines beginning with ``D''.
526 @item
527 Flag for maximum errors before ending compile.
529 @item
530 Generate code to check for null pointer dereferences -- prints locus of
531 dereference instead of segfaulting.  There was some discussion about this
532 option in the g95 development mailing list.
534 @item
535 Allow setting the default unit number.
537 @item
538 Option to initialize otherwise uninitialized integer and floating
539 point variables.
541 @item
542 Support for OpenMP directives.  This also requires support from the runtime
543 library and the rest of the compiler.
545 @item
546 Support for Fortran 200x. This includes several new features including
547 floating point exceptions, extended use of allocatable arrays, C
548 interoperability, Parameterizer data types and function pointers.
549 @end itemize
552 @subsection Environment Options
553 @itemize @bullet
554 @item
555 Pluggable library modules for random numbers, linear algebra.
556 LA should use BLAS calling conventions.
558 @item
559 Environment variables controlling actions on arithmetic exceptions like
560 overflow, underflow, precision loss -- Generate NaN, abort, default.
561 action.
563 @item
564 Set precision for fp units that support it (i387).
566 @item
567 Variable for setting fp rounding mode.
569 @item
570 Variable to fill uninitialized variables with a user-defined bit
571 pattern.
573 @item
574 Environment variable controlling filename that is opened for that unit
575 number.
577 @item
578 Environment variable to clear/trash memory being freed.
580 @item
581 Environment variable to control tracing of allocations and frees.
583 @item
584 Environment variable to display allocated memory at normal program end.
586 @item
587 Environment variable for filename for * IO-unit.
589 @item
590 Environment variable for temporary file directory.
592 @item
593 Environment variable forcing standard output to be line buffered (unix).
595 @item
596 Variable for swapping endianness during unformatted read.
598 @item
599 Variable for swapping Endianness during unformatted write.
600 @end itemize
602 @c ---------------------------------------------------------------------
603 @c Extensions
604 @c ---------------------------------------------------------------------
606 @c Maybe this chapter should be merged with the 'Standards' section,
607 @c whenever that is written :-)
609 @node Extensions
610 @chapter Extensions
611 @cindex Extension
613 @command{gfortran} implements a number of extensions over standard
614 Fortran. This chapter contains information on their syntax and
615 meaning.  There are currently two categories of @command{gfortran}
616 extensions, those that provide functionality beyond that provided
617 by any standard, and those that are supported by @command{gfortran}
618 purely for backward compatibility with legacy compilers.  By default,
619 @option{-std=gnu} allows the compiler to accept both types of
620 extensions, but to warn about the use of the latter.  Specifying
621 either @option{-std=f95} or @option{-std=f2003} disables both types
622 of extensions, and @option{-std=legacy} allows both without warning.
624 @menu
625 * Old-style kind specifications::
626 * Old-style variable initialization::
627 * Extensions to namelist::
628 * X format descriptor::
629 * Commas in FORMAT specifications::
630 * I/O item lists::
631 * Hexadecimal constants::
632 * Real array indices::
633 * Unary operators::
634 * Implicitly interconvert LOGICAL and INTEGER::
635 * Hollerith constants support::
636 @end menu
638 @node Old-style kind specifications
639 @section Old-style kind specifications
640 @cindex Kind specifications
642 @command{gfortran} allows old-style kind specifications in
643 declarations. These look like:
644 @smallexample
645       TYPESPEC*k x,y,z
646 @end smallexample
647 where @code{TYPESPEC} is a basic type, and where @code{k} is a valid kind
648 number for that type. The statement then declares @code{x}, @code{y}
649 and @code{z} to be of type @code{TYPESPEC} with kind @code{k}. In
650 other words, it is equivalent to the standard conforming declaration
651 @smallexample
652       TYPESPEC(k) x,y,z
653 @end smallexample
655 @node Old-style variable initialization
656 @section Old-style variable initialization
657 @cindex Initialization
659 @command{gfortran} allows old-style initialization of variables of the
660 form:
661 @smallexample
662       INTEGER*4 i/1/,j/2/
663       REAL*8 x(2,2) /3*0.,1./
664 @end smallexample
665 These are only allowed in declarations without double colons
666 (@code{::}), as these were introduced in Fortran 90 which also
667 introduced a new syntax for variable initializations. The syntax for
668 the individual initializers is as for the @code{DATA} statement, but
669 unlike in a @code{DATA} statement, an initializer only applies to the
670 variable immediately preceding. In other words, something like
671 @code{INTEGER I,J/2,3/} is not valid.
673 Examples of standard conforming code equivalent to the above example, are:
674 @smallexample
675 ! Fortran 90
676       INTEGER(4) :: i = 1, j = 2
677       REAL(8) :: x(2,2) = RESHAPE((/0.,0.,0.,1./),SHAPE(x))
678 ! Fortran 77
679       INTEGER  i, j
680       DOUBLE PRECISION x(2,2)
681       DATA i,j,x /1,2,3*0.,1./
682 @end smallexample
684 @node Extensions to namelist
685 @section Extensions to namelist
686 @cindex Namelist
688 @command{gfortran} fully supports the Fortran 95 standard for namelist I/O
689 including array qualifiers, substrings and fully qualified derived types.
690 The output from a namelist write is compatible with namelist read.  The
691 output has all names in upper case and indentation to column 1 after the
692 namelist name.  Two extensions are permitted:
694 Old-style use of $ instead of &
695 @smallexample
696 $MYNML
697  X(:)%Y(2) = 1.0 2.0 3.0
698  CH(1:4) = "abcd"
699 $END
700 @end smallexample
702 It should be noticed that the default terminator is / rather than &END.
704 Querying of the namelist when inputting from stdin. After at least
705 one space, entering ? sends to stdout the namelist name and the names of
706 the variables in the namelist:
707 @smallexample
710 &mynml
712  x%y
713  ch
714 &end
715 @end smallexample
717 Entering =? outputs the namelist to stdout, as if WRITE (*,NML = mynml)
718 had been called:
719 @smallexample
722 &MYNML
723  X(1)%Y=  0.000000    ,  1.000000    ,  0.000000    ,
724  X(2)%Y=  0.000000    ,  2.000000    ,  0.000000    ,
725  X(3)%Y=  0.000000    ,  3.000000    ,  0.000000    ,
726  CH=abcd,  /
727 @end smallexample
729 To aid this dialog, when input is from stdin, errors send their
730 messages to stderr and execution continues, even if IOSTAT is set.
732 PRINT namelist is permitted.  This causes an error if -std=f95 is used.
733 @smallexample
734 PROGRAM test_print
735   REAL, dimension (4)  ::  x = (/1.0, 2.0, 3.0, 4.0/)
736   NAMELIST /mynml/ x
737   PRINT mynml
738 END PROGRAM test_print
739 @end smallexample
741 @node X format descriptor
742 @section X format descriptor
743 @cindex X format descriptor
745 To support legacy codes, @command{gfortran} permits the count field
746 of the X edit descriptor in FORMAT statements to be omitted.  When
747 omitted, the count is implicitly assumed to be one.
749 @smallexample
750        PRINT 10, 2, 3
751 10     FORMAT (I1, X, I1)
752 @end smallexample
754 @node Commas in FORMAT specifications
755 @section Commas in FORMAT specifications
756 @cindex Commas in FORMAT specifications
758 To support legacy codes, @command{gfortran} allows the comma separator
759 to be omitted immediately before and after character string edit
760 descriptors in FORMAT statements.
762 @smallexample
763        PRINT 10, 2, 3
764 10     FORMAT ('FOO='I1' BAR='I2)
765 @end smallexample
767 @node I/O item lists
768 @section I/O item lists
769 @cindex I/O item lists
771 To support legacy codes, @command{gfortran} allows the input item list
772 of the READ statement, and the output item lists of the WRITE and PRINT
773 statements to start with a comma.
775 @node Hexadecimal constants
776 @section Hexadecimal constants
777 @cindex Hexadecimal constants
779 As a GNU extension, @command{gfortran} allows hexadecimal constants to
780 be specified using the X prefix, in addition to the standard Z prefix.
782 @node Real array indices
783 @section Real array indices
784 @cindex Real array indices
786 As a GNU extension, @command{gfortran} allows arrays to be indexed using
787 real types, whose values are implicitly converted to integers.
789 @node Unary operators
790 @section Unary operators
791 @cindex Unary operators
793 As a GNU extension, @command{gfortran} allows unary plus and unary
794 minus operators to appear as the second operand of binary arithmetic
795 operators without the need for parenthesis.
797 @smallexample
798        X = Y * -Z
799 @end smallexample
801 @node Implicitly interconvert LOGICAL and INTEGER
802 @section Implicitly interconvert LOGICAL and INTEGER
803 @cindex Implicitly interconvert LOGICAL and INTEGER
805 As a GNU extension for backwards compatibility with other compilers,
806 @command{gfortran} allows the implicit conversion of LOGICALs to INTEGERs
807 and vice versa.  When converting from a LOGICAL to an INTEGER, the numeric
808 value of @code{.FALSE.} is zero, and that of @code{.TRUE.} is one.  When
809 converting from INTEGER to LOGICAL, the value zero is interpreted as
810 @code{.FALSE.} and any nonzero value is interpreted as @code{.TRUE.}.
812 @smallexample
813        INTEGER*4 i
814        i = .FALSE.
815 @end smallexample
817 @node Hollerith constants support
818 @section Hollerith constants support
819 @cindex Hollerith constants
821 A Hollerith constant is a string of characters preceded by the letter @samp{H}
822 or @samp{h}, and there must be an literal, unsigned, nonzero default integer
823 constant indicating the number of characters in the string. Hollerith constants
824 are stored as byte strings, one character per byte.
826 @command{gfortran} supports Hollerith constants. They can be used as the right
827 hands in the @code{DATA} statement and @code{ASSIGN} statement, also as the
828 arguments. The left hands can be of Integer, Real, Complex and Logical type.
829 The constant will be padded or trancated to fit the size of left hand.
831 Valid Hollerith constants examples:
832 @smallexample
833 complex*16 x(2)
834 data x /16Habcdefghijklmnop, 16Hqrstuvwxyz012345/
835 call foo (4H abc)
836 x(1) = 16Habcdefghijklmnop
837 @end smallexample
839 Invalid Hollerith constants examples:
840 @smallexample
841 integer*4 a
842 a = 8H12345678 ! The Hollerith constant is too long. It will be truncated.
843 a = 0H         ! At least one character needed.
844 @end smallexample
846 @include intrinsic.texi
847 @c ---------------------------------------------------------------------
848 @c Contributing
849 @c ---------------------------------------------------------------------
851 @node Contributing
852 @chapter Contributing
853 @cindex Contributing
855 Free software is only possible if people contribute to efforts
856 to create it.
857 We're always in need of more people helping out with ideas
858 and comments, writing documentation and contributing code.
860 If you want to contribute to GNU Fortran 95,
861 have a look at the long lists of projects you can take on.
862 Some of these projects are small,
863 some of them are large;
864 some are completely orthogonal to the rest of what is
865 happening on @command{gfortran},
866 but others are ``mainstream'' projects in need of enthusiastic hackers.
867 All of these projects are important!
868 We'll eventually get around to the things here,
869 but they are also things doable by someone who is willing and able.
871 @menu
872 * Contributors::
873 * Projects::
874 @end menu
877 @node Contributors
878 @section Contributors to GNU Fortran 95
879 @cindex Contributors
880 @cindex Credits
881 @cindex Authors
883 Most of the parser was hand-crafted by @emph{Andy Vaught}, who is
884 also the initiator of the whole project.  Thanks Andy!
885 Most of the interface with GCC was written by @emph{Paul Brook}.
887 The following individuals have contributed code and/or
888 ideas and significant help to the gfortran project
889 (in no particular order): 
891 @itemize @minus
892 @item Andy Vaught
893 @item Katherine Holcomb
894 @item Tobias Schlüter
895 @item Steven Bosscher
896 @item Toon Moene
897 @item Tim Prince
898 @item Niels Kristian Bech Jensen
899 @item Steven Johnson
900 @item Paul Brook
901 @item Feng Wang
902 @item Bud Davis
903 @end itemize
905 The following people have contributed bug reports,
906 smaller or larger patches,
907 and much needed feedback and encouragement for the
908 @command{gfortran} project: 
910 @itemize @minus
911 @item Erik Schnetter
912 @item Bill Clodius
913 @item Kate Hedstrom
914 @end itemize
916 Many other individuals have helped debug,
917 test and improve @command{gfortran} over the past two years,
918 and we welcome you to do the same!
919 If you already have done so,
920 and you would like to see your name listed in the
921 list above, please contact us.
924 @node Projects
925 @section Projects
927 @table @emph
929 @item Help build the test suite
930 Solicit more code for donation to the test suite.
931 We can keep code private on request.
933 @item Bug hunting/squishing
934 Find bugs and write more test cases!
935 Test cases are especially very welcome,
936 because it allows us to concentrate on fixing bugs
937 instead of isolating them.
939 @item Smaller projects (``bug'' fixes):
940   @itemize @minus
941   @item Allow init exprs to be numbers raised to integer powers.
942   @item Implement correct rounding.
943   @item Implement F restrictions on Fortran 95 syntax.
944   @item See about making Emacs-parsable error messages.
945   @end itemize
946 @end table
948 If you wish to work on the runtime libraries,
949 please contact a project maintainer.
950 @c TODO: email!
953 @c ---------------------------------------------------------------------
954 @c Standards
955 @c ---------------------------------------------------------------------
957 @node Standards
958 @chapter Standards
959 @cindex Standards
961 The GNU Fortran 95 Compiler aims to be a conforming implementation of
962 ISO/IEC 1539:1997 (Fortran 95).
964 In the future it may also support other variants of and extensions to
965 the Fortran language.  These include ANSI Fortran 77, ISO Fortran 90,
966 ISO Fortran 2003 and OpenMP.
968 @menu
969 * Fortran 2003 status::
970 @end menu
972 @node Fortran 2003 status
973 @section Fortran 2003 status
975 Although @command{gfortran} focuses on implementing the Fortran 95
976 standard for the time being, a few Fortran 2003 features are currently
977 available.
979 @itemize
980 @item 
981 Intrinsics @code{command_argument_count}, @code{get_command},
982 @code{get_command_argument}, and @code{get_environment_variable}.
984 @item 
985 Array constructors using square brackets. That is, @code{[...]} rather
986 than @code{(/.../)}.
988 @item 
989 @code{FLUSH} statement.
991 @item
992 @code{IOMSG=} specifier for I/O statements.
993 @end itemize
996 @c ---------------------------------------------------------------------
997 @c Index
998 @c ---------------------------------------------------------------------
1000 @node Index
1001 @unnumbered Index
1003 @printindex cp
1005 @bye