RETREV(3f) - [ARGUMENTS:M_kracken] get keyword value as a string from a commands argument list processed by kracken(3f) (LICENSE:PD)
Synopsis
Description
Options
Examples
See Also
Author
License
SUBROUTINE retrev(name, string, len, ier)
CHARACTER(len=*),intent(in) :: name CHARACTER(len=*),intent(out) :: string INTEGER,intent(out) :: len INTEGER,intent(out) :: ier
When a command has had its command argument list parsed using the kracken(3f) routine the value associated with any keyword can be retrieved as a string.
NAME parameter name of form VERB_KEYWORD STRING returned parameter value LEN length of returned STRING IER error flag. Any non-zero value means an error occurred
Sample program:
program demo_retrev use M_kracken, only : kracken, retrev use M_kracken, only : IPvalue ! length of keyword value implicit none character(len=IPvalue) :: val integer :: len, ierExample execution and output:call kracken(demo, -value my default string) call retrev(demo_value,val,len,ier) write(*,(a))VALUE IS //trim(val)
end program demo_retrev
$ ./demo_retrev VALUE IS my default string$ ./demo_retrev -value use this value instead VALUE IS use this value instead
dget(3f), dgets(3f), iget(3f), igets(3f), lget(3f), lgets(3f), rget(3f), rgets(3f), sget(3f), sgets(3f), retrev(3f)
M_kracken(3f), kracken(3f) parse(3f), dissect(3f), store(3f), setprompts(3f), show(3f)
John S. Urban
Public Domain
Nemo Release 3.1 | retrev (3) | February 23, 2025 |