getpat(3f) - [M_MATCH] convert str into pattern
(LICENSE:PD)
integer function getpat(str, pat)
convert str into pattern
John S. Urban
“Software Tools” by Kernighan and Plauger , 1976
Public Domain
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer(kind=def) | :: | arg(maxarg) | ||||
| integer(kind=def) | :: | pat(maxpat) |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | arg_str | |||
| integer(kind=def), | intent(out) | :: | pat(maxpat) |