fix demod for inline-variant
This commit is contained in:
parent
61fa9fe7dc
commit
788e8bb5f4
|
@ -66,6 +66,8 @@
|
|||
(error 'build-graph "Doesn't handle syntax")]
|
||||
[(? seq-for-syntax?)
|
||||
(error 'build-graph "Doesn't handle syntax")]
|
||||
[(struct inline-variant (direct inline))
|
||||
(build-graph! lhs direct)]
|
||||
[(struct req (reqs dummy))
|
||||
(build-graph! lhs dummy)]
|
||||
[(? mod?)
|
||||
|
|
|
@ -12,6 +12,8 @@
|
|||
(error 'increment "Doesn't handle syntax")]
|
||||
[(? seq-for-syntax?)
|
||||
(error 'increment "Doesn't handle syntax")]
|
||||
[(struct inline-variant (direct inline))
|
||||
(update direct)]
|
||||
[(struct req (reqs dummy))
|
||||
(make-req reqs (update dummy))]
|
||||
[(? mod?)
|
||||
|
|
Loading…
Reference in New Issue
Block a user