Re: suckless !! More is less !

Moi, je préfère utiliser un langage qui se démerde tout seul avec tout ça.

type Program_Status_Word is
 record
 System_Mask : Byte_Mask;
 Protection_Key : Integer range 0 .. 3;
 Machine_State : State_Mask;
 Interrupt_Cause : Interruption_Code;
 Ilc : Integer range 0 .. 3;
 Cc : Integer range 0 .. 3;
 Program_Mask : Mode_Mask;
 Inst_Address : Address;
end record;
for Program_Status_Word use
 record
 System_Mask at 0*Word range 0 .. 7;
 Protection_Key at 0*Word range 10 .. 11; -- bits 8,9 unused
 Machine_State at 0*Word range 12 .. 15;
 Interrupt_Cause at 0*Word range 16 .. 31;
 Ilc at 1*Word range 0 .. 1; -- second word
 Cc at 1*Word range 2 .. 3;
 Program_Mask at 1*Word range 4 .. 7;
 Inst_Address at 1*Word range 8 .. 31;
 end record;

Là, au moins, y a juste à décrire.