GETARG.html 6.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153
  1. <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
  2. <html>
  3. <!-- Copyright (C) 1999-2017 Free Software Foundation, Inc.
  4. Permission is granted to copy, distribute and/or modify this document
  5. under the terms of the GNU Free Documentation License, Version 1.3 or
  6. any later version published by the Free Software Foundation; with the
  7. Invariant Sections being "Funding Free Software", the Front-Cover
  8. Texts being (a) (see below), and with the Back-Cover Texts being (b)
  9. (see below). A copy of the license is included in the section entitled
  10. "GNU Free Documentation License".
  11. (a) The FSF's Front-Cover Text is:
  12. A GNU Manual
  13. (b) The FSF's Back-Cover Text is:
  14. You have freedom to copy and modify this GNU Manual, like GNU
  15. software. Copies published by the Free Software Foundation raise
  16. funds for GNU development. -->
  17. <!-- Created by GNU Texinfo 5.2, http://www.gnu.org/software/texinfo/ -->
  18. <head>
  19. <title>The GNU Fortran Compiler: GETARG</title>
  20. <meta name="description" content="The GNU Fortran Compiler: GETARG">
  21. <meta name="keywords" content="The GNU Fortran Compiler: GETARG">
  22. <meta name="resource-type" content="document">
  23. <meta name="distribution" content="global">
  24. <meta name="Generator" content="makeinfo">
  25. <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
  26. <link href="index.html#Top" rel="start" title="Top">
  27. <link href="Option-Index.html#Option-Index" rel="index" title="Option Index">
  28. <link href="index.html#SEC_Contents" rel="contents" title="Table of Contents">
  29. <link href="Intrinsic-Procedures.html#Intrinsic-Procedures" rel="up" title="Intrinsic Procedures">
  30. <link href="GET_005fCOMMAND.html#GET_005fCOMMAND" rel="next" title="GET_COMMAND">
  31. <link href="GERROR.html#GERROR" rel="prev" title="GERROR">
  32. <style type="text/css">
  33. <!--
  34. a.summary-letter {text-decoration: none}
  35. blockquote.smallquotation {font-size: smaller}
  36. div.display {margin-left: 3.2em}
  37. div.example {margin-left: 3.2em}
  38. div.indentedblock {margin-left: 3.2em}
  39. div.lisp {margin-left: 3.2em}
  40. div.smalldisplay {margin-left: 3.2em}
  41. div.smallexample {margin-left: 3.2em}
  42. div.smallindentedblock {margin-left: 3.2em; font-size: smaller}
  43. div.smalllisp {margin-left: 3.2em}
  44. kbd {font-style:oblique}
  45. pre.display {font-family: inherit}
  46. pre.format {font-family: inherit}
  47. pre.menu-comment {font-family: serif}
  48. pre.menu-preformatted {font-family: serif}
  49. pre.smalldisplay {font-family: inherit; font-size: smaller}
  50. pre.smallexample {font-size: smaller}
  51. pre.smallformat {font-family: inherit; font-size: smaller}
  52. pre.smalllisp {font-size: smaller}
  53. span.nocodebreak {white-space:nowrap}
  54. span.nolinebreak {white-space:nowrap}
  55. span.roman {font-family:serif; font-weight:normal}
  56. span.sansserif {font-family:sans-serif; font-weight:normal}
  57. ul.no-bullet {list-style: none}
  58. -->
  59. </style>
  60. </head>
  61. <body lang="en" bgcolor="#FFFFFF" text="#000000" link="#0000FF" vlink="#800080" alink="#FF0000">
  62. <a name="GETARG"></a>
  63. <div class="header">
  64. <p>
  65. Next: <a href="GET_005fCOMMAND.html#GET_005fCOMMAND" accesskey="n" rel="next">GET_COMMAND</a>, Previous: <a href="GERROR.html#GERROR" accesskey="p" rel="prev">GERROR</a>, Up: <a href="Intrinsic-Procedures.html#Intrinsic-Procedures" accesskey="u" rel="up">Intrinsic Procedures</a> &nbsp; [<a href="index.html#SEC_Contents" title="Table of contents" rel="contents">Contents</a>][<a href="Option-Index.html#Option-Index" title="Index" rel="index">Index</a>]</p>
  66. </div>
  67. <hr>
  68. <a name="GETARG-_002d_002d_002d-Get-command-line-arguments"></a>
  69. <h3 class="section">9.120 <code>GETARG</code> &mdash; Get command line arguments</h3>
  70. <a name="index-GETARG"></a>
  71. <a name="index-command_002dline-arguments-1"></a>
  72. <a name="index-arguments_002c-to-program-1"></a>
  73. <dl compact="compact">
  74. <dt><em>Description</em>:</dt>
  75. <dd><p>Retrieve the <var>POS</var>-th argument that was passed on the
  76. command line when the containing program was invoked.
  77. </p>
  78. <p>This intrinsic routine is provided for backwards compatibility with
  79. GNU Fortran 77. In new code, programmers should consider the use of
  80. the <a href="GET_005fCOMMAND_005fARGUMENT.html#GET_005fCOMMAND_005fARGUMENT">GET_COMMAND_ARGUMENT</a> intrinsic defined by the Fortran 2003
  81. standard.
  82. </p>
  83. </dd>
  84. <dt><em>Standard</em>:</dt>
  85. <dd><p>GNU extension
  86. </p>
  87. </dd>
  88. <dt><em>Class</em>:</dt>
  89. <dd><p>Subroutine
  90. </p>
  91. </dd>
  92. <dt><em>Syntax</em>:</dt>
  93. <dd><p><code>CALL GETARG(POS, VALUE)</code>
  94. </p>
  95. </dd>
  96. <dt><em>Arguments</em>:</dt>
  97. <dd><table>
  98. <tr><td width="15%"><var>POS</var></td><td width="70%">Shall be of type <code>INTEGER</code> and not wider than
  99. the default integer kind; <em><var>POS</var> \geq 0</em></td></tr>
  100. <tr><td width="15%"><var>VALUE</var></td><td width="70%">Shall be of type <code>CHARACTER</code> and of default
  101. kind.</td></tr>
  102. <tr><td width="15%"><var>VALUE</var></td><td width="70%">Shall be of type <code>CHARACTER</code>.</td></tr>
  103. </table>
  104. </dd>
  105. <dt><em>Return value</em>:</dt>
  106. <dd><p>After <code>GETARG</code> returns, the <var>VALUE</var> argument holds the
  107. <var>POS</var>th command line argument. If <var>VALUE</var> can not hold the
  108. argument, it is truncated to fit the length of <var>VALUE</var>. If there are
  109. less than <var>POS</var> arguments specified at the command line, <var>VALUE</var>
  110. will be filled with blanks. If <em><var>POS</var> = 0</em>, <var>VALUE</var> is set
  111. to the name of the program (on systems that support this feature).
  112. </p>
  113. </dd>
  114. <dt><em>Example</em>:</dt>
  115. <dd><div class="smallexample">
  116. <pre class="smallexample">PROGRAM test_getarg
  117. INTEGER :: i
  118. CHARACTER(len=32) :: arg
  119. DO i = 1, iargc()
  120. CALL getarg(i, arg)
  121. WRITE (*,*) arg
  122. END DO
  123. END PROGRAM
  124. </pre></div>
  125. </dd>
  126. <dt><em>See also</em>:</dt>
  127. <dd><p>GNU Fortran 77 compatibility function: <a href="IARGC.html#IARGC">IARGC</a>
  128. </p>
  129. <p>Fortran 2003 functions and subroutines: <a href="GET_005fCOMMAND.html#GET_005fCOMMAND">GET_COMMAND</a>,
  130. <a href="GET_005fCOMMAND_005fARGUMENT.html#GET_005fCOMMAND_005fARGUMENT">GET_COMMAND_ARGUMENT</a>, <a href="COMMAND_005fARGUMENT_005fCOUNT.html#COMMAND_005fARGUMENT_005fCOUNT">COMMAND_ARGUMENT_COUNT</a>
  131. </p></dd>
  132. </dl>
  133. </body>
  134. </html>