makpat(3f) - [M_MATCH] make pattern from arg(from), terminate on delim
(LICENSE:PD)
integer function makpat(arg, from, delim, pat)
make pattern from arg(from), terminate on delim
John S. Urban
“Software Tools” by Kernighan and Plauger , 1976
Public Domain
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer(kind=chr) | :: | arg(maxarg) | ||||
integer(kind=def) | :: | from | ||||
integer(kind=chr) | :: | delim | ||||
integer(kind=chr) | :: | pat(maxpat) |