# "Pmode" IDT builder. PE=1, use32. The default. plain dismisses.


			# set up Interrupt Descriptor Table.
			# to be INLINE in flow of control during setup
L defaultallvectors
zero DI				# for DI = 0 to 127
L perIDTvector
	pushcore
	  = twitch to A		# install twitch to vector DI 		
          call install
	pullcore
        1+ DI
        -test 127 with DI
when    not     zero   short  	perIDTvector

L defaultallIRQs
= 0x20 to DI			# for DI = 0 to 127
L perIRQvector
	pushcore
	  = IRQtwitch to A		# install IRQtwitch to vector DI
          call install
	pullcore
        1+ DI
        -test 0x30 with DI
when    not     zero    short	perIRQvector

= 0x20 to DI
pushcore
= IRQ0twitch to A
call install
pullcore


setIDT $IDTpointer


