note description: "[ A parallel port's read-write data register. ]" legal : "See notice at end of class." status : "See notice at end of class."; author : "Paul Bates (paul.a.bates@gmail.com)" date : "$Date$" revision: "$Revision$" frozen class PRT_PARALLEL_DATA_REGISTER inherit PRT_PARALLEL_REGISTER rename bit_0 as data_0, bit_1 as data_1, bit_2 as data_2, bit_3 as data_3, bit_4 as data_4, bit_5 as data_5, bit_6 as data_6, bit_7 as data_7, set_bit_0 as set_data_0, set_bit_1 as set_data_1, set_bit_2 as set_data_2, set_bit_3 as set_data_3, set_bit_4 as set_data_4, set_bit_5 as set_data_5, set_bit_6 as set_data_6, set_bit_7 as set_data_7 end create {PRT_PARALLEL_CONNECTION} make feature -- Access data_bit_mask: NATURAL_8 = 0b11111111 -- type: attached PRT_PARALLEL_REGISTER_TYPE -- once Result := {PRT_PARALLEL_REGISTER_TYPE}.data end end