OSDN Git Service

* decl.c, dump-parse-tree.c, gfortran.texi, intrinsic.texi,
[pf3gnuchains/gcc-fork.git] / gcc / fortran / gfortran.texi
1 \input texinfo  @c -*-texinfo-*-
2 @c %**start of header
3 @setfilename gfortran.info
4 @set copyrights-gfortran 1999-2005
5
6 @include gcc-common.texi
7
8 @settitle The GNU Fortran 95 Compiler
9
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
18
19 @c %**end of header
20
21 @c Use with @@smallbook.
22
23 @c %** start of document
24
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.
29
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.)
34
35 @c @tex
36 @c \global\bindingoffset=0.75in
37 @c \global\normaloffset =0.75in
38 @c @end tex
39
40 @copying
41 Copyright @copyright{} @value{copyrights-gfortran} Free Software Foundation, Inc.
42
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''.
51
52 (a) The FSF's Front-Cover Text is:
53
54      A GNU Manual
55
56 (b) The FSF's Back-Cover Text is:
57
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
62
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}).
70
71 Published by the Free Software Foundation
72 51 Franklin Street, Fifth Floor
73 Boston, MA 02110-1301 USA
74
75 @insertcopying
76 @end ifinfo
77
78 Contributed by Steven Bosscher (@email{s.bosscher@@gcc.gnu.org}).
79
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
101
102 @node Top, Copying,, (DIR)
103 @top Introduction
104 @cindex Introduction
105
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.
109
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
115
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
138
139
140
141 @c ---------------------------------------------------------------------
142 @c GNU General Public License
143 @c ---------------------------------------------------------------------
144
145 @include gpl.texi
146
147
148
149 @c ---------------------------------------------------------------------
150 @c GNU Free Documentation License
151 @c ---------------------------------------------------------------------
152
153 @include fdl.texi
154
155
156
157 @c ---------------------------------------------------------------------
158 @c Funding Free Software
159 @c ---------------------------------------------------------------------
160
161 @include funding.texi
162
163
164
165 @c ---------------------------------------------------------------------
166 @c Getting Started
167 @c ---------------------------------------------------------------------
168
169 @node Getting Started
170 @chapter Getting Started
171
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.
176
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.
180
181 When @command{gfortran} is finished,
182 it will do everything you expect from any decent compiler: 
183
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}.
190
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.
202
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}.
211
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}.
216
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.
224
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}). 
229
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
236
237 Gfortran consists of several components:
238
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.
249
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.
258
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.
269
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
280
281
282
283 @c ---------------------------------------------------------------------
284 @c GFORTRAN and GCC
285 @c ---------------------------------------------------------------------
286
287 @node GFORTRAN and GCC
288 @chapter GFORTRAN and GCC
289 @cindex GNU Compiler Collection
290
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.
299
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}.
304
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.
318
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.
323
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.
333
334
335
336 @c ---------------------------------------------------------------------
337 @c GFORTRAN and G77
338 @c ---------------------------------------------------------------------
339
340 @node GFORTRAN and G77
341 @chapter GFORTRAN and G77
342 @cindex Fortran 77
343 @cindex G77
344
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?
350
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. 
362
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.
369
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.
375
376 @include invoke.texi
377
378 @c ---------------------------------------------------------------------
379 @c Project Status
380 @c ---------------------------------------------------------------------
381
382 @node Project Status
383 @chapter Project Status
384
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....
392
393 --Andy Vaught, April 2000
394 @end quotation
395
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).
400
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.
404
405 @menu
406 * Compiler Status::
407 * Library Status::
408 * Proposed Extensions::
409 @end menu
410
411 @node Compiler Status
412 @section Compiler Status
413
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.
424
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
431
432 @node Library Status
433 @section Library Status
434
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.
441
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.)
447
448 The IO library is still under development.  The following features should be
449 usable for real programs:
450
451 @itemize @minus
452 @item List directed
453 @item Unformatted sequential
454 @end itemize
455
456 Usable with bugs:
457
458 @itemize @minus
459 @item Formatted sequential ('T' edit descriptor, and others)
460 @end itemize
461
462 Not recommended:
463
464 @itemize @minus
465 @item Unformatted direct access
466 @item Formatted direct access
467 @end itemize
468
469 Many Fortran programs only use a small subset of the available IO
470 capabilities, so your mileage may vary.
471
472 @node Proposed Extensions
473 @section Proposed Extensions
474
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.
479
480 @subsection Compiler extensions: 
481 @itemize @bullet
482 @item
483 Flag for defining the kind number for default logicals.
484
485 @item
486 User-specified alignment rules for structures.
487 @item
488 Flag to generate @code{Makefile} info.
489
490 @item
491 Automatically extend single precision constants to double.
492
493 @item
494 Cray pointers (this was high on the @command{g77} wishlist).
495
496 @item
497 Compile code that conserves memory by dynamically allocating common and
498 module storage either on stack or heap.
499
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.
503
504 @item
505 Compile flag to generate code for array conformance checking (suggest -CC).
506
507 @item
508 User control of symbol names (underscores, etc).
509
510 @item
511 Compile setting for maximum size of stack frame size before spilling
512 parts to static or heap.
513
514 @item
515 Flag to force local variables into static space.
516
517 @item
518 Flag to force local variables onto stack.
519
520 @item
521 Flag to compile lines beginning with ``D''.
522
523 @item
524 Flag to ignore lines beginning with ``D''.
525
526 @item
527 Flag for maximum errors before ending compile.
528
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.
533
534 @item
535 Allow setting the default unit number.
536
537 @item
538 Option to initialize otherwise uninitialized integer and floating
539 point variables.
540
541 @item
542 Support for OpenMP directives.  This also requires support from the runtime
543 library and the rest of the compiler.
544
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
550
551
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.
557
558 @item
559 Environment variables controlling actions on arithmetic exceptions like
560 overflow, underflow, precision loss -- Generate NaN, abort, default.
561 action.
562
563 @item
564 Set precision for fp units that support it (i387).
565
566 @item
567 Variable for setting fp rounding mode.
568
569 @item
570 Variable to fill uninitialized variables with a user-defined bit
571 pattern.
572
573 @item
574 Environment variable controlling filename that is opened for that unit
575 number.
576
577 @item
578 Environment variable to clear/trash memory being freed.
579
580 @item
581 Environment variable to control tracing of allocations and frees.
582
583 @item
584 Environment variable to display allocated memory at normal program end.
585
586 @item
587 Environment variable for filename for * IO-unit.
588
589 @item
590 Environment variable for temporary file directory.
591
592 @item
593 Environment variable forcing standard output to be line buffered (unix).
594
595 @item
596 Variable for swapping endianness during unformatted read.
597
598 @item
599 Variable for swapping Endianness during unformatted write.
600 @end itemize
601
602 @c ---------------------------------------------------------------------
603 @c Extensions
604 @c ---------------------------------------------------------------------
605
606 @c Maybe this chapter should be merged with the 'Standards' section,
607 @c whenever that is written :-)
608
609 @node Extensions
610 @chapter Extensions
611 @cindex Extension
612
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.
623
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
637
638 @node Old-style kind specifications
639 @section Old-style kind specifications
640 @cindex Kind specifications
641
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
654
655 @node Old-style variable initialization
656 @section Old-style variable initialization
657 @cindex Initialization
658
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.
672
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
683
684 @node Extensions to namelist
685 @section Extensions to namelist
686 @cindex Namelist
687
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:
693
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
701
702 It should be noticed that the default terminator is / rather than &END.
703
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
708 ?
709
710 &mynml
711  x
712  x%y
713  ch
714 &end
715 @end smallexample
716
717 Entering =? outputs the namelist to stdout, as if WRITE (*,NML = mynml)
718 had been called:
719 @smallexample
720 =?
721
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
728
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.
731
732 @node X format descriptor
733 @section X format descriptor
734 @cindex X format descriptor
735
736 To support legacy codes, @command{gfortran} permits the count field
737 of the X edit descriptor in FORMAT statements to be omitted.  When
738 omitted, the count is implicitly assumed to be one.
739
740 @smallexample
741        PRINT 10, 2, 3
742 10     FORMAT (I1, X, I1)
743 @end smallexample
744
745 @node Commas in FORMAT specifications
746 @section Commas in FORMAT specifications
747 @cindex Commas in FORMAT specifications
748
749 To support legacy codes, @command{gfortran} allows the comma separator
750 to be omitted immediately before and after character string edit
751 descriptors in FORMAT statements.
752
753 @smallexample
754        PRINT 10, 2, 3
755 10     FORMAT ('FOO='I1' BAR='I2)
756 @end smallexample
757
758 @node I/O item lists
759 @section I/O item lists
760 @cindex I/O item lists
761
762 To support legacy codes, @command{gfortran} allows the input item list
763 of the READ statement, and the output item lists of the WRITE and PRINT
764 statements to start with a comma.
765
766 @node Hexadecimal constants
767 @section Hexadecimal constants
768 @cindex Hexadecimal constants
769
770 As a GNU extension, @command{gfortran} allows hexadecimal constants to
771 be specified using the X prefix, in addition to the standard Z prefix.
772
773 @node Real array indices
774 @section Real array indices
775 @cindex Real array indices
776
777 As a GNU extension, @command{gfortran} allows arrays to be indexed using
778 real types, whose values are implicitly converted to integers.
779
780 @node Unary operators
781 @section Unary operators
782 @cindex Unary operators
783
784 As a GNU extension, @command{gfortran} allows unary plus and unary
785 minus operators to appear as the second operand of binary arithmetic
786 operators without the need for parenthesis.
787
788 @smallexample
789        X = Y * -Z
790 @end smallexample
791
792 @node Implicitly interconvert LOGICAL and INTEGER
793 @section Implicitly interconvert LOGICAL and INTEGER
794 @cindex Implicitly interconvert LOGICAL and INTEGER
795
796 As a GNU extension for backwards compatibility with other compilers,
797 @command{gfortran} allows the implicit conversion of LOGICALs to INTEGERs
798 and vice versa.  When converting from a LOGICAL to an INTEGER, the numeric
799 value of @code{.FALSE.} is zero, and that of @code{.TRUE.} is one.  When
800 converting from INTEGER to LOGICAL, the value zero is interpreted as
801 @code{.FALSE.} and any nonzero value is interpreted as @code{.TRUE.}.
802
803 @smallexample
804        INTEGER*4 i
805        i = .FALSE.
806 @end smallexample
807
808 @node Hollerith constants support
809 @section Hollerith constants support
810 @cindex Hollerith constants
811
812 A Hollerith constant is a string of characters preceded by the letter @samp{H}
813 or @samp{h}, and there must be an literal, unsigned, nonzero default integer
814 constant indicating the number of characters in the string. Hollerith constants
815 are stored as byte strings, one character per byte.
816
817 @command{gfortran} supports Hollerith constants. They can be used as the right
818 hands in the @code{DATA} statement and @code{ASSIGN} statement, also as the
819 arguments. The left hands can be of Integer, Real, Complex and Logical type.
820 The constant will be padded or trancated to fit the size of left hand.
821
822 Valid Hollerith constants examples:
823 @smallexample
824 complex*16 x(2)
825 data x /16Habcdefghijklmnop, 16Hqrstuvwxyz012345/
826 call foo (4H abc)
827 x(1) = 16Habcdefghijklmnop
828 @end smallexample
829
830 Invalid Hollerith constants examples:
831 @smallexample
832 integer*4 a
833 a = 8H12345678 ! The Hollerith constant is too long. It will be truncated.
834 a = 0H         ! At least one character needed.
835 @end smallexample
836
837 @include intrinsic.texi
838 @c ---------------------------------------------------------------------
839 @c Contributing
840 @c ---------------------------------------------------------------------
841
842 @node Contributing
843 @chapter Contributing
844 @cindex Contributing
845
846 Free software is only possible if people contribute to efforts
847 to create it.
848 We're always in need of more people helping out with ideas
849 and comments, writing documentation and contributing code.
850
851 If you want to contribute to GNU Fortran 95,
852 have a look at the long lists of projects you can take on.
853 Some of these projects are small,
854 some of them are large;
855 some are completely orthogonal to the rest of what is
856 happening on @command{gfortran},
857 but others are ``mainstream'' projects in need of enthusiastic hackers.
858 All of these projects are important!
859 We'll eventually get around to the things here,
860 but they are also things doable by someone who is willing and able.
861
862 @menu
863 * Contributors::
864 * Projects::
865 @end menu
866
867
868 @node Contributors
869 @section Contributors to GNU Fortran 95
870 @cindex Contributors
871 @cindex Credits
872 @cindex Authors
873
874 Most of the parser was hand-crafted by @emph{Andy Vaught}, who is
875 also the initiator of the whole project.  Thanks Andy!
876 Most of the interface with GCC was written by @emph{Paul Brook}.
877
878 The following individuals have contributed code and/or
879 ideas and significant help to the gfortran project
880 (in no particular order): 
881
882 @itemize @minus
883 @item Andy Vaught
884 @item Katherine Holcomb
885 @item Tobias Schlüter
886 @item Steven Bosscher
887 @item Toon Moene
888 @item Tim Prince
889 @item Niels Kristian Bech Jensen
890 @item Steven Johnson
891 @item Paul Brook
892 @item Feng Wang
893 @item Bud Davis
894 @end itemize
895
896 The following people have contributed bug reports,
897 smaller or larger patches,
898 and much needed feedback and encouragement for the
899 @command{gfortran} project: 
900
901 @itemize @minus
902 @item Erik Schnetter
903 @item Bill Clodius
904 @item Kate Hedstrom
905 @end itemize
906
907 Many other individuals have helped debug,
908 test and improve @command{gfortran} over the past two years,
909 and we welcome you to do the same!
910 If you already have done so,
911 and you would like to see your name listed in the
912 list above, please contact us.
913
914
915 @node Projects
916 @section Projects
917
918 @table @emph
919
920 @item Help build the test suite
921 Solicit more code for donation to the test suite.
922 We can keep code private on request.
923
924 @item Bug hunting/squishing
925 Find bugs and write more test cases!
926 Test cases are especially very welcome,
927 because it allows us to concentrate on fixing bugs
928 instead of isolating them.
929
930 @item Smaller projects (``bug'' fixes):
931   @itemize @minus
932   @item Allow init exprs to be numbers raised to integer powers.
933   @item Implement correct rounding.
934   @item Implement F restrictions on Fortran 95 syntax.
935   @item See about making Emacs-parsable error messages.
936   @end itemize
937 @end table
938
939 If you wish to work on the runtime libraries,
940 please contact a project maintainer.
941 @c TODO: email!
942
943
944 @c ---------------------------------------------------------------------
945 @c Standards
946 @c ---------------------------------------------------------------------
947
948 @node Standards
949 @chapter Standards
950 @cindex Standards
951
952 The GNU Fortran 95 Compiler aims to be a conforming implementation of
953 ISO/IEC 1539:1997 (Fortran 95).
954
955 In the future it may also support other variants and extensions to the Fortran
956 language.  This includes ANSI Fortran 77, Fortran 90, Fortran 2000 (not yet
957 finalized), and OpenMP.
958
959 @node Index
960 @unnumbered Index
961
962 @printindex cp
963
964 @bye