markConstant :: Monad m => Int -> Ref -> BuilderT g m ()
markConstant !x !ref = bs_constants . at x ?= ref
markConstant :: Monad m => Int -> Ref -> BuilderT g m ()
markConstant !x !ref = bs_constants . at x ?= ref
markConstant !x !ref = bs_constants . at x ?= ref