-- | Like 'getPinInputMode'.
getInterruptPinInputMode :: (MonadGpio h m) => InterruptPin h -> m PinInputMode
getInterruptPinInputMode p =
  getPinInputMode (_interruptHandle p)
getInterruptPinInputMode :: (MonadGpio h m) => InterruptPin h -> m PinInputMode
getInterruptPinInputMode p =
  getPinInputMode (_interruptHandle p)
getInterruptPinInputMode p =
  getPinInputMode (_interruptHandle p)