#!/usr/bin/perl
use Test::More tests => 2;
use Carp;
use strict;
use warnings;
use Device::USB;
use Device::USB::Win32Async;
# Original methods all there
can_ok( 'Device::USB::Device',
qw/filename configurations get_configuration
bcdUSB bDeviceClass bDeviceSubClass
bDeviceProtocol bMaxPacketSize0 idVendor idProduct
bcdDevice iManufacturer iProduct iSerialNumber bNumConfigurations/
);
# New methods added
can_ok( 'Device::USB::Device',
qw/free_async cancel_async reap_async_nocancel reap_async submit_async
interrupt_setup_async bulk_setup_async isochronous_setup_async/
);