ДВК (и всё, что с ними связано)

[Alex_K]

Для FADD по идее такого случая нету.

А переполнение порядка. Вроде возможно если сложить два самых больших числа.

[form]

А переполнение порядка. Вроде возможно если сложить два самых больших числа.

Надо проверить возможен ли такой случай в данном конкретном случае с учетом того, что RESORC заведомо в low memory выполняется.

[Patron]

Заплатка для RESORC из RT-11 v05.04 выглядит так:

	MOV	SP,R2		;Point to stack (but don't destroy)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	MOV	SP, (PC)+
ResSP:	.Word	0
	Sub	#8., SP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	MOV	#40000,-(R2)	;We'll check for FIS by adding .5 to .5
	CLR	-(R2)		;
	MOV	#40000,-(R2)	;
	CLR	-(R2)		;
	FADD	R2		;Do a floating point add
;;	NOP			;One instruction delay for T11.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	MOV	ResSP, SP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	BCS	3$		;If C set, no FIS

А драйвер завтра исправлю..

[Alex_K]

Сложил в UKNCBTL два самых больших числа (077777 177777). Получил переполнение порядка, прервалось по вектору 244, в стеке 202 на месте PSW.

[form]

Заплатка для RESORC из RT-11 v05.04 выглядит так

Это мне напоминает когда выпустили "аналог" TA11 который не различал байт и слово, а потом "поправили кривые драйвера DEC" чтобы работало

[Alex_K]

Заплатка для RESORC из RT-11 v05.04 выглядит так:

	MOV	SP,R2		;Point to stack (but don't destroy)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	MOV	SP, (PC)+
ResSP:	.Word	0
	Sub	#8., SP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	MOV	#40000,-(R2)	;We'll check for FIS by adding .5 to .5
	CLR	-(R2)		;
	MOV	#40000,-(R2)	;
	CLR	-(R2)		;
	FADD	R2		;Do a floating point add
;;	NOP			;One instruction delay for T11.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	MOV	ResSP, SP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
	BCS	3$		;If C set, no FIS

А драйвер завтра исправлю..

Можно было сделать проще - заслать аргументы в стек и сложить командой FADD SP, и R2 трогать не надо.

[Advertiser]

[form]

Сложил в UKNCBTL два самых больших числа (077777 177777). Получил переполнение порядка, прервалось по вектору 244, в стеке 202 на месте PSW.

Тут надо проверять не два самых больших числа, а реальные числа которые могут оказаться с учетом адреса в котором выполняется

---------- Post added at 04:22 ---------- Previous post was at 04:22 ----------

Можно было сделать проще - заслать аргументы в стек и сложить командой FADD SP, и R2 трогать не надо.

Только потом SP надо на место ставить

[Patron]

Можно было сделать проще - заслать аргументы в стек и сложить командой FADD SP, и R2 трогать не надо.

Зато исходный код остался неизменным :)))

[Alex_K]

Тут надо проверять не два самых больших числа, а реальные числа которые могут оказаться с учетом адреса в котором выполняется

Это я к тому, что и FADD может прерваться по 244 вектору.

Только потом SP надо на место ставить

Это да. Действительно.

[form]

Копаясь в RESORC от 5.7 обнаружил закоментированную фичу - просмотр параметров кэша (драйвер CA). Самого драйвера не вижу.

---------- Post added at 04:28 ---------- Previous post was at 04:26 ----------

А .COM для его сборки есть...

---------- Post added at 04:37 ---------- Previous post was at 04:28 ----------

А в KMON команда есть