Re: Fortran's Equivalence

[dewar@merv.cs.nyu.edu (Robert Dewar)]

Simon said

<<What worked for me was

  given an interfaces.c.int to be interpreted as bit fields
  declare record type without representation
  declare variable "result" of this type
  if system.default_bit_order = system.high_order_first then
    declare derived record type with big-endian representation
    do unchecked conversion from interfaces.c.int to this type
    assign to "result"
  else
    declare derived record type with little-endian representation
    do unchecked conversion from interfaces.c.int to this type
    assign to "result"
  end if

which is long-winded but does the job! No doubt there are other ways ..>>


This does NOT work in the general case, it only works if you have a simple
case where all fields are conveniently aligned, which is a small subset of
possible cases.