Commit ec77243f by Brooks Moses Committed by Brooks Moses

re PR fortran/30922 (IMPORT fails for same symbol in multiple interface bodies…

re PR fortran/30922 (IMPORT fails for same symbol in multiple interface bodies of same interface block)

PR fortran/30922
PR fortran/30948
PR fortran/30953
* intrinsics.texi (CHDIR): Fix argument names, note
that STATUS must be a default integer.
(CTIME): Fix argument names, note that RESULT must
be a default integer.
(EXIT): Note that STATUS must be a default integer.

From-SVN: r122905
parent 6f50a76a
2007-03-13 Brooks Moses <brooks.moses@codesourcery.com> 2007-03-13 Brooks Moses <brooks.moses@codesourcery.com>
PR fortran/30922
PR fortran/30948
PR fortran/30953
* intrinsics.texi (CHDIR): Fix argument names, note
that STATUS must be a default integer.
(CTIME): Fix argument names, note that RESULT must
be a default integer.
(EXIT): Note that STATUS must be a default integer.
2007-03-13 Brooks Moses <brooks.moses@codesourcery.com>
PR fortran/28068 PR fortran/28068
* intrinsic.texi: General whitespace cleanup, remove * intrinsic.texi: General whitespace cleanup, remove
comment about missing intrinsics. comment about missing intrinsics.
......
...@@ -1907,23 +1907,30 @@ and formatted string representations. ...@@ -1907,23 +1907,30 @@ and formatted string representations.
@table @asis @table @asis
@item @emph{Description}: @item @emph{Description}:
Change current working directory to a specified @var{PATH}. Change current working directory to a specified path.
This intrinsic is provided in both subroutine and function forms; however,
only one form can be used in any given program unit.
@item @emph{Standard}: @item @emph{Standard}:
GNU extension GNU extension
@item @emph{Class}: @item @emph{Class}:
Non-elemental subroutine Subroutine, non-elemental function
@item @emph{Syntax}: @item @emph{Syntax}:
@code{CALL CHDIR(PATH [, STATUS])} @multitable @columnfractions .80
@item @code{CALL CHDIR(NAME [, STATUS])}
@item @code{STATUS = CHDIR(NAME)}
@end multitable
@item @emph{Arguments}: @item @emph{Arguments}:
@multitable @columnfractions .15 .70 @multitable @columnfractions .15 .70
@item @var{PATH} @tab The type shall be @code{CHARACTER(*)} and shall @item @var{NAME} @tab The type shall be @code{CHARACTER(*)} and shall
specify a valid path within the file system. specify a valid path within the file system.
@item @var{STATUS} @tab (Optional) status flag. Returns 0 on success, @item @var{STATUS} @tab (Optional) @code{INTEGER} status flag of the default
a system specific and non-zero error code otherwise. kind. Returns 0 on success, and a system specific
and non-zero error code otherwise.
@end multitable @end multitable
@item @emph{Example}: @item @emph{Example}:
...@@ -2421,15 +2428,11 @@ end program test_cshift ...@@ -2421,15 +2428,11 @@ end program test_cshift
@table @asis @table @asis
@item @emph{Description}: @item @emph{Description}:
@code{CTIME(T,S)} converts @var{T}, a system time value, such as returned @code{CTIME} converts a system time value, such as returned by
by @code{TIME8()}, to a string of the form @samp{Sat Aug 19 18:13:14 @code{TIME8()}, to a string of the form @samp{Sat Aug 19 18:13:14 1995}.
1995}, and returns that string into @var{S}.
If @code{CTIME} is invoked as a function, it can not be invoked as a
subroutine, and vice versa.
@var{T} is an @code{INTENT(IN)} @code{INTEGER(KIND=8)} variable. This intrinsic is provided in both subroutine and function forms; however,
@var{S} is an @code{INTENT(OUT)} @code{CHARACTER} variable. only one form can be used in any given program unit.
@item @emph{Standard}: @item @emph{Standard}:
GNU extension GNU extension
...@@ -2439,14 +2442,14 @@ Subroutine ...@@ -2439,14 +2442,14 @@ Subroutine
@item @emph{Syntax}: @item @emph{Syntax}:
@multitable @columnfractions .80 @multitable @columnfractions .80
@item @code{CALL CTIME(T,S)}. @item @code{CALL CTIME(TIME, RESULT)}.
@item @code{S = CTIME(T)}, (not recommended). @item @code{RESULT = CTIME(TIME)}, (not recommended).
@end multitable @end multitable
@item @emph{Arguments}: @item @emph{Arguments}:
@multitable @columnfractions .15 .70 @multitable @columnfractions .15 .70
@item @var{S}@tab The type shall be of type @code{CHARACTER}. @item @var{TIME} @tab The type shall be of type @code{INTEGER(KIND=8)}.
@item @var{T}@tab The type shall be of type @code{INTEGER(KIND=8)}. @item @var{RESULT} @tab The type shall be of type @code{CHARACTER}.
@end multitable @end multitable
@item @emph{Return value}: @item @emph{Return value}:
...@@ -3273,7 +3276,7 @@ Subroutine ...@@ -3273,7 +3276,7 @@ Subroutine
@item @emph{Arguments}: @item @emph{Arguments}:
@multitable @columnfractions .15 .70 @multitable @columnfractions .15 .70
@item @var{STATUS} @tab The type of the argument shall be @code{INTEGER(*)}. @item @var{STATUS} @tab Shall be an @code{INTEGER} of the default kind.
@end multitable @end multitable
@item @emph{Return value}: @item @emph{Return value}:
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment