# NOT RUN {
optigrab:::is_flag( c( "--foo", "bar") )
optigrab:::is_flag( c( "--foo", "bar", "-f", "-b", "text" ) )
optigrab:::which.flag( c( "--foo", "bar") )
optigrab:::which.flag( c( "--foo", "bar", "-f", "-b", "text" ))
# }
Run the code above in your browser using DataLab