Source position: nroseh.inc line 67
type rose_cause_struct = record
cause: Byte;
diagnostic: Byte;
end;