optimizer: fix do_make_discarding_sequence

The optimizer converts (car (cons X Y)) to (begin0 X Y) and then reduces it to (begin Y X) if X is movable.
Check that the movement is safe for space and for continuation captures.