	#    Set up Real Mode Interrupt Descriptor Table.
	#    To be INLINE in flow of control during setup


= $IDT16P to BP

		L defaultallRMvectors
zero DI					# for DI = 0 to 127
L perVMIDTvector
	pushcore
	  = twitch16P to A		# install twitch to vector DI 		
          call install
	pullcore
        1+ DI
        -test 127 with DI
when    not	zero		perVMIDTvector


					#L VMdefaultallIRQs
= $firstIRQ to DI			# for DI = 0 to 127
L VMperIRQvector
	pushcore
	= IRQtwitch16P to A		# install IRQtwitch to vector DI
          call installunP
	pullcore
        1+ DI
        -test $((firstIRQ+0x10)) with DI
when    not     zero		VMperIRQvector


= 0x20 to DI
pushcore
= $IRQ0twitch16P to A
call installunP
pullcore


#setIDT $VMIDTpointer



# Ya know, there's probably a trivial way to do namespace scoping
#   with the shell.
