From: Bill Joy <wnj@ucbvax.Berkeley.EDU>
Date: Sun, 25 Nov 1979 09:38:04 +0000 (-0800)
Subject: BSD 3 development
X-Git-Tag: BSD-3~594
X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/commitdiff_plain/41666eb09dc03d814e52808f3544b10137515832?ds=inline

BSD 3 development
Work on file usr/man/man3/getarg.3f

Synthesized-from: 3bsd
---

diff --git a/usr/man/man3/getarg.3f b/usr/man/man3/getarg.3f
new file mode 100644
index 0000000000..2d4d691a40
--- /dev/null
+++ b/usr/man/man3/getarg.3f
@@ -0,0 +1,36 @@
+.TH GETARG 3F
+.SH NAME
+getarg, iargc \- command arguments to Fortran
+.SH SYNOPSIS
+.nf
+.ft B
+subroutine getarg( argno, string )
+integer argno
+character \(**(\(**) string
+.PP
+.B iargc()
+.fi
+.ft R
+.SH DESCRIPTION
+These procedures permit Fortran programs to access the command arguments.
+The integer function
+.B iargc
+returns the number of command arguments.
+The subroutine
+.B getarg
+stores the nth command argument in its second argument.
+The string is truncated or padded with blanks,
+in accord with the rules of Fortran character assignment.
+.PP
+The command
+       go arg1 argument2
+.br
+will return 2 as the value of
+.B iargc.
+If \fBs\fR is declared character\(**4,
+then
+      call getarg(2, s)
+.br
+will put "argu" in \fBs\fR.
+.SH "SEE ALSO"
+exec(2)