tags: handle literals for undefined structures.

* tags.tl: bind *read-unknown-structs* to t around
the file walk.

1 files changed, 1 insertions, 0 deletions

diff --git a/tags.tl b/tags.tl
index 32008e80..25926285 100755
--- a/tags.tl
+++ b/tags.tl
@@ -260,6 +260,7 @@
     (let* ((have-arv (boundp 'ftw-actionretval))
            (excf [apply orf (mapcar (do op fnmatch @@1 @1) o.exclude)])
            (skips ())
+           (*read-unknown-structs* t)
            (tags (build
                    (ftw o.out-args
                         (lambda (path type stat . rest)