summaryrefslogtreecommitdiff
path: root/support/dktools/dk4aopt05.ctr
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /support/dktools/dk4aopt05.ctr
Initial commit
Diffstat (limited to 'support/dktools/dk4aopt05.ctr')
-rw-r--r--support/dktools/dk4aopt05.ctr41
1 files changed, 41 insertions, 0 deletions
diff --git a/support/dktools/dk4aopt05.ctr b/support/dktools/dk4aopt05.ctr
new file mode 100644
index 0000000000..48302a94f8
--- /dev/null
+++ b/support/dktools/dk4aopt05.ctr
@@ -0,0 +1,41 @@
+%% options
+
+copyright owner = Dirk Krause
+copyright year = 2015-xxxx
+license = bsd
+
+
+
+%% module
+
+#include "dk4opt.h"
+#include "dk4aopt.h"
+
+
+
+int
+dk4app_opt_get_double_short(double *rp, dk4_app_t *app, dkChar c, dk4_er_t *erp)
+{
+ dk4_option_t *optr;
+ int back = 0;
+ if ((NULL != rp) && (NULL != app)) {
+ if (NULL != app->i_opt_short) {
+ optr = (dk4_option_t *)dk4sto_it_find_like(app->i_opt_short, &c, 1);
+ if (NULL != optr) {
+ if (0 != optr->found) {
+ back = dk4opt_get_double(rp, optr, erp);
+ } else {
+ dk4error_set_simple_error_code(erp, DK4_E_NOT_FOUND);
+ }
+ } else {
+ dk4error_set_simple_error_code(erp, DK4_E_SYNTAX);
+ }
+ } else {
+ dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
+ }
+ } else {
+ dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
+ }
+ return back;
+}
+