// K1-16/16 Microcode // 2015-12-22 16:10:39 : implicit__SerialDevice__shrink__6uint16AEC_6uint16_ ( uint16[]¢, uint16 ) Millicoded // Size: 6 microcodes mc ShrinkStr mc Ret : SerialDevice__getavail__12SerialDeviceC_6uint16 ( SerialDevice¢ -- uint16 ) // next_m this.getctl(ioctl_in_avail); psh alu ld alu,4 // ioctl_in_avail: in dev.h jp Device__getctl__6DeviceC_6uint16_6uint16 : SerialDevice__getfree__12SerialDeviceC_6uint16 ( SerialDevice¢ -- uint16 ) // next_m this.getctl(ioctl_out_free); psh alu ld alu,5 // ioctl_out_free: in dev.h jp Device__getctl__6DeviceC_6uint16_6uint16 : SerialDevice__readbyte__12SerialDeviceC_6uint16 ( SerialDevice¢ -- uint16 ) Millicoded // Size: 22 microcodes mc Dup mc ItemGet+4 mc Int8+0 mc Int16+128 mc And mc BraIf0+6 mc Dup mc ItemGet+5 mc Lget+255 mc ItemGet+8 mc CallMillicode mc Bra+5 mc Dup mc ItemGet+5 mc Lget+255 mc ItemGet+8 mc CallOpcode mc MNip0_Next-1 : SerialDevice__writebyte__12SerialDeviceC_6uint16_ ( SerialDevice¢, uint16 ) Millicoded // Size: 24 microcodes mc Lget+255 mc ItemGet+4 mc Int8+0 mc Int16+128 mc And mc BraIf0+7 mc Lget+255 mc ItemGet+5 mc Lget+255 mc Lget+253 mc ItemGet+10 mc CallMillicode mc Bra+6 mc Lget+255 mc ItemGet+5 mc Lget+255 mc Lget+253 mc ItemGet+10 mc CallOpcode mc MDrop0_Next-2 : SerialDevice__readbytes__12SerialDeviceC_6uint16AEC_6uint16_6uint16_6uint16 ( SerialDevice¢, uint16[]¢, uint16, uint16 -- uint16 ) Millicoded // Size: 28 microcodes mc Lget+253 mc ItemGet+4 mc Int8+0 mc Int16+128 mc And mc BraIf0+9 mc Lget+253 mc ItemGet+5 mc Lget+253 mc Lget+253 mc Lget+253 mc Lget+249 mc ItemGet+9 mc CallMillicode mc Bra+8 mc Lget+253 mc ItemGet+5 mc Lget+253 mc Lget+253 mc Lget+253 mc Lget+249 mc ItemGet+9 mc CallOpcode mc MNip0_Next-4 : SerialDevice__writebytes__12SerialDeviceC_6uint16AEC_6uint16_6uint16_6uint16 ( SerialDevice¢, uint16[]¢, uint16, uint16 -- uint16 ) Millicoded // Size: 28 microcodes mc Lget+253 mc ItemGet+4 mc Int8+0 mc Int16+128 mc And mc BraIf0+9 mc Lget+253 mc ItemGet+5 mc Lget+253 mc Lget+253 mc Lget+253 mc Lget+249 mc ItemGet+11 mc CallMillicode mc Bra+8 mc Lget+253 mc ItemGet+5 mc Lget+253 mc Lget+253 mc Lget+253 mc Lget+249 mc ItemGet+11 mc CallOpcode mc MNip0_Next-4 : SerialDevice__readbytes__12SerialDeviceC_6uint16AEC_ ( SerialDevice¢, uint16[]¢ ) Millicoded // Size: 45 microcodes mc Int8+0 mc Lget+255 mc Count mc Lget+253 mc ItemGet+4 mc Int8+0 mc Int16+128 mc And mc BraIf0+13 mc Lget+253 mc ItemGet+5 mc Lget+253 mc Lget+253 mc Lget+253 mc Lget+251 mc Sub mc Lget+249 mc ItemGet+9 mc CallMillicode mc Lvar+254 mc AddPoke mc Bra+12 mc Lget+253 mc ItemGet+5 mc Lget+253 mc Lget+253 mc Lget+253 mc Lget+251 mc Sub mc Lget+249 mc ItemGet+9 mc CallOpcode mc Lvar+254 mc AddPoke mc Lget+255 mc Lget+255 mc Ult mc BraIf0+2 mc Halt mc Bra-37 mc MDrop0_Next-4 : SerialDevice__writebytes__12SerialDeviceC_6uint16AEC_ ( SerialDevice¢, uint16[]¢ ) Millicoded // Size: 45 microcodes mc Int8+0 mc Lget+255 mc Count mc Lget+253 mc ItemGet+4 mc Int8+0 mc Int16+128 mc And mc BraIf0+13 mc Lget+253 mc ItemGet+5 mc Lget+253 mc Lget+253 mc Lget+253 mc Lget+251 mc Sub mc Lget+249 mc ItemGet+11 mc CallMillicode mc Lvar+254 mc AddPoke mc Bra+12 mc Lget+253 mc ItemGet+5 mc Lget+253 mc Lget+253 mc Lget+253 mc Lget+251 mc Sub mc Lget+249 mc ItemGet+11 mc CallOpcode mc Lvar+254 mc AddPoke mc Lget+255 mc Lget+255 mc Ult mc BraIf0+2 mc Halt mc Bra-37 mc MDrop0_Next-4 : SerialDevice__readdata__12SerialDeviceC_6uint16AEC_ ( SerialDevice¢, uint16[]¢ ) Millicoded // Size: 44 microcodes mc Lget+255 mc ItemGet+3 mc BraIf0+4 mc Lget+255 mc Lget+255 mc SerialDevice__readbytes__12SerialDeviceC_6uint16AEC_ mc Bra+32 mc Int8+64 mc Alloc mc Int8+0 mc Int8+0 mc Int8+32 mc Lget+252 mc Count mc Lget+253 mc Sub mc Umin mc Nip mc Dup mc BraIf0+17 mc Lvar+254 mc PeekNZ mc Lget+255 mc Sli15+15-1 mc implicit__SerialDevice__shrink__6uint16AEC_6uint16_ mc Lget+252 mc Lget+253 mc SerialDevice__readbytes__12SerialDeviceC_6uint16AEC_ mc Lget+254 mc Int8+0 mc Lget+251 mc Lget+252 mc copy_i8_to_i16__6uint16AEC_6uint16_6uint16AEC_6uint16_ mc Dup mc Lvar+254 mc AddPoke mc Bra-26 mc MDrop0-2 mc DropStr mc MDrop0_Next-2 : SerialDevice__writedata__12SerialDeviceC_6uint16AEC_ ( SerialDevice¢, uint16[]¢ ) Millicoded // Size: 44 microcodes mc Lget+255 mc ItemGet+3 mc BraIf0+4 mc Lget+255 mc Lget+255 mc SerialDevice__writebytes__12SerialDeviceC_6uint16AEC_ mc Bra+32 mc Int8+64 mc Alloc mc Int8+0 mc Int8+0 mc Int8+32 mc Lget+252 mc Count mc Lget+253 mc Sub mc Umin mc Nip mc Dup mc BraIf0+17 mc Lvar+254 mc PeekNZ mc Lget+255 mc Sli15+15-1 mc implicit__SerialDevice__shrink__6uint16AEC_6uint16_ mc Lget+253 mc Lget+254 mc Lget+252 mc Int8+0 mc copy_i16_to_i8__6uint16AEC_6uint16_6uint16AEC_6uint16_ mc Lget+252 mc Lget+253 mc SerialDevice__writebytes__12SerialDeviceC_6uint16AEC_ mc Dup mc Lvar+254 mc AddPoke mc Bra-26 mc MDrop0-2 mc DropStr mc MDrop0_Next-2 : SerialDevice__getstr__12SerialDeviceC_8ucs2charAE ( SerialDevice¢ -- ucs2str ) Millicoded // Size: 50 microcodes mc Int8+50 mc Int8+0 mc Lget+255 mc Alloc mc Int8+0 mc Lget+254 mc Lget+252 mc Eq mc BraIf0+7 mc Int8+50 mc Lvar+252 mc AddPoke mc Lvar+255 mc PeekNZ mc Lget+252 mc GrowStr mc Lget+252 mc SerialDevice__readbyte__12SerialDeviceC_6uint16 mc Nip mc Dup mc Int8+16 mc Ult mc And0 mc Bra+4 mc Dup mc Int8+17 mc Int16+52 mc And mc BraIf1+6 mc Dup mc Lget+254 mc Lvar+252 mc Peekpp mc AtIndexPoke mc Bra-30 mc Lget+255 mc Int8+0 mc Lget+252 mc SubStr mc Cast_RangeStr mc ToR mc MDrop0-1 mc DropStr mc MDrop0-3 mc FromR mc Ret : new__8ucs2charAEC_6uint16_8DrvrDataC_6uint16B8DrvrDataC6uint16D_4voidB8DrvrDataC6uint166uint16D_6uint16B8DrvrDataCD_6uint16B8DrvrDataC6uint16AEC6uint166uint16D_4voidB8DrvrDataC6uint16D_6uint16B8DrvrDataC6uint16AEC6uint166uint16D_12SerialDevice ( ucs2str¢, uint16, DrvrData¢, t_getctl, t_setctl, t_getc, t_gets, t_putc, t_gets -- SerialDevice ) Millicoded // Size: 48 microcodes mc Int8+12 mc Alloc mc ToR mc Int8+4 mc PeekR mc ItemSet+0 mc Lget+248 mc Retain mc PeekR mc ItemSet+1 mc Lget+249 mc Int8+32 mc And mc Int8+0 mc Ne mc PeekR mc ItemSet+3 mc Lget+249 mc PeekR mc ItemSet+4 mc Lget+250 mc PeekR mc ItemSet+5 mc Lget+251 mc PeekR mc ItemSet+6 mc Lget+252 mc PeekR mc ItemSet+7 mc Lget+253 mc PeekR mc ItemSet+8 mc Lget+254 mc PeekR mc ItemSet+9 mc Lget+255 mc PeekR mc ItemSet+10 mc Dup mc PeekR mc ItemSet+11 mc FromR mc MNip0-8 mc MNip0_Next-1