From: tonyg <tonythegair@gmail.com>
Subject: variant record initialisation
Date: Tue, 31 Mar 2015 03:09:59 -0700 (PDT)
Date: 2015-03-31T03:09:59-07:00 [thread overview]
Message-ID: <9cb5ed17-c63a-4184-bea5-1da4b40bb2c2@googlegroups.com> (raw)
I am trying to initialise a variant record
The_Device : Device_Details_Type(Get_The_Class_Type(The_Index));
The_Class_Type goes to find the variant discriminant and I have checked this returns a value correctly
Then when I initialise it using the code above inside the declaration of a function I get
2015-03-31 10:55:48.82 : Exception name: PROGRAM_ERROR
Message: device_file_storage.adb:217 finalize/adjust raised exception
Any ideas?
next reply other threads:[~2015-03-31 10:09 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2015-03-31 10:09 tonyg [this message]
2015-03-31 19:11 ` variant record initialisation Randy Brukardt
2015-04-01 8:35 ` tonyg
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox