[db] watch for nested wildcard selectors
Probably don't need the old (eq? '*) case, but keeping it anyway
This commit is contained in:
parent
ada69b0d58
commit
11015f40a4
|
@ -66,7 +66,8 @@
|
|||
|
||||
(define (resolve-wildcard tbl-schema row)
|
||||
(cond
|
||||
[(eq? row '*)
|
||||
[(or (eq? row '*)
|
||||
(and (list? row) (not (null? row)) (null? (cdr row)) (eq? '* (car row))))
|
||||
(map car tbl-schema)]
|
||||
[(list? row)
|
||||
row]
|
||||
|
|
Loading…
Reference in New Issue
Block a user