# fill defaults into Forreal Mode IDT
			# installs USE32 code in a schmegmented IDT,
			#  which implies the reflex has at least an
 			#   entry-point in legmeg


			# to be INLINE in flow of control during setup
# L defaultFMvectors
zero DI					# for DI = 0 to 127
L perFMIDTvector
	pushcore
	  = twitch32unP to A		# install twitch to vector DI 		
          call install32unP
	pullcore
        1+ DI
        -test 255 with DI
when    not     zero    short	perFMIDTvector

					#  L defaultallFMIRQs
= firstIRQ to DI			#       for DI = 0 to 127
L perFMIRQvector
	pushcore
	  = IRQtwitch32unP to A		# install IRQtwitch to vector DI
          call install32unP
	pullcore
        1+ DI
        -test $((firstIRQ+0x10)) with DI
when    not     zero    short	perFMIRQvector


= firstIRQ to DI
pushcore
= IRQ0twitch32unP to A
call install32unP
pullcore


