Extend sscanf to accept %[...] patterns

diff --git a/lib/expr/exeval.c b/lib/expr/exeval.c
index 5301e58d55ba588227297f5187c174bc1bf74b76..4ed1eeeae6df3e3087eba521db12a941d2c25795 100644 (file)
--- a/lib/expr/exeval.c
+++ b/lib/expr/exeval.c
@@ -474,6 +474,7 @@ scformat(Sfio_t* sp, void* vp, Sffmt_t* dp)
                *((void**)vp) = &node->data.variable.symbol->value->data.constant.value;
                break;
        case 's':
+       case '[':
                if (node->type != STRING)
                {
                        exerror("scanf: %s: string variable address argument expected", node->data.variable.symbol->name);