ack/mach/i86/libem/cii.s

.sect .text; .sect .rom; .sect .data; .sect .bss
.define .cii

.sect .text
.cii:
	pop     bx              ! return address
				! pop     cx, dest. size
				! pop     dx, src. size
				! ax is first word of source
	cmp	dx,1
	jne	2f
	cbw
	mov	dx,2
2:
	cmp     dx,cx
	je      8f
	cmp     dx,2
	je      1f
	cmp     dx,4
	jne     9f
	cmp     cx,2
	jne     9f
	pop     dx
8:
	jmp     bx
1:
	cmp     cx,4
	jne     9f
	cwd
	push    dx
	jmp     bx
9:
	push    ax              ! push low source
.extern EILLINS
.extern .fat
	mov     ax,EILLINS
	push    ax
	jmp     .fat
	jmp     bx
adapted to new assembler syntax 1987-01-08 10:13:48 +00:00			`.sect .text; .sect .rom; .sect .data; .sect .bss`
* empty log message * 1985-02-07 15:33:13 +00:00			`.define .cii`

adapted to new assembler syntax 1987-01-08 10:13:48 +00:00			`.sect .text`
* empty log message * 1985-02-07 15:33:13 +00:00			`.cii:`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`pop bx ! return address`
* empty log message * 1985-02-07 15:33:13 +00:00			`! pop cx, dest. size`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`! pop dx, src. size`
* empty log message * 1985-02-07 15:33:13 +00:00			`! ax is first word of source`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`cmp dx,1`
Bug fix: did not accept loc 1 loc 4 cii 1987-04-13 12:52:38 +00:00			`jne 2f`
			`cbw`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`mov dx,2`
Bug fix: did not accept loc 1 loc 4 cii 1987-04-13 12:52:38 +00:00			`2:`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`cmp dx,cx`
* empty log message * 1985-02-07 15:33:13 +00:00			`je 8f`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`cmp dx,2`
* empty log message * 1985-02-07 15:33:13 +00:00			`je 1f`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`cmp dx,4`
Bug fix: did not accept loc 1 loc 4 cii 1987-04-13 12:52:38 +00:00			`jne 9f`
* empty log message * 1985-02-07 15:33:13 +00:00			`cmp cx,2`
			`jne 9f`
			`pop dx`
			`8:`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`jmp bx`
* empty log message * 1985-02-07 15:33:13 +00:00			`1:`
			`cmp cx,4`
			`jne 9f`
			`cwd`
			`push dx`
many changes because of introduction of register variables si/di 1987-06-09 10:22:50 +00:00			`jmp bx`
* empty log message * 1985-02-07 15:33:13 +00:00			`9:`
			`push ax ! push low source`
adapted to new assembler syntax 1987-01-08 10:13:48 +00:00			`.extern EILLINS`
			`.extern .fat`
* empty log message * 1985-02-07 15:33:13 +00:00			`mov ax,EILLINS`
			`push ax`
			`jmp .fat`
			`jmp bx`