getOutput :: Get TxOutput
getOutput = do
  val <- get
  VarInt scriptLength <- get
  script <- getScript (fromIntegral scriptLength)
  return TxOutput
    { _value = val
    , _outputScript = script }
getOutput :: Get TxOutput
getOutput = do
  val <- get
  VarInt scriptLength <- get
  script <- getScript (fromIntegral scriptLength)
  return TxOutput
    { _value = val
    , _outputScript = script }
getOutput = do
  val <- get
  VarInt scriptLength <- get
  script <- getScript (fromIntegral scriptLength)
  return TxOutput
    { _value = val
    , _outputScript = script }