setState :: CgState -> FCode ()
setState state = FCode $ \_info_down _ -> (# (), state #)
setState :: CgState -> FCode ()
setState state = FCode $ \_info_down _ -> (# (), state #)
setState state = FCode $ \_info_down _ -> (# (), state #)