Corruption in device struct

[jbarrett]

$ reply
0> use MIDI::RtMidi::FFI::Device
1> my $dev = MIDI::RtMidi::FFI::Device->new
$res[0] = MIDI::RtMidi::FFI::Device  { ...
2> $dev->msg
$res[1] = ""
3> $dev->ok
$res[2] = 1
4> $dev->open_port(123,'foo')

MidiOutAlsa::openPort: the 'portNumber' argument (123) is invalid.

$res[3] = 0
5> $dev->open_port(0,'foo')
$res[4] = 0
6> $dev->ok
$res[5] = 0
7> $dev->ok
$res[6] = 0
8> $dev->msg
$res[7] = "6    V"
9> $dev->msg
$res[8] = "6    V"
10> $dev->msg
$res[9] = "6    V"
11> $dev->msg
$res[10] = "6   V"
12> $dev->msg
$res[11] = "LC_COLLATE=C"

[jbarrett]

The ok member is never reset after an error.
The msg member is set from a reference which goes out of scope