Hi,
I need (want!) to initialize variant records. I have created a small example - doesn't compile of course because I can't find how to do it. I guess GPC can do it since VS_Pascal (IBM/MVS), VAXPascal and SPARCPascal all allow me to do it (all in different ways of course!).
Anyone?
Cheers, Martin.
program varaint_test( input , output ) ;
type variant_record = record case boolean of false : ( compare : integer( 32 ) ) ; true : (
case boolean of false : ( page , offset : integer( 16 ) ) ; true : ( len , disp : integer( 16 ) ) ; ) ; end ;
var mgcd : variant_record := ( compare : 12345 ) ; (* How can I do this? *)
begin writeln( 'ok' ) ; end.