convert to haskell: UTIL_SWAP()マクロ -> swap_int()