From d66e5d984f9b2d3ee45621e1a3f2f1b4d508d1f6 Mon Sep 17 00:00:00 2001 From: Peter Ferrie Date: Mon, 22 Nov 2021 22:04:42 -0800 Subject: [PATCH] shave some bytes - setting of SS is not interruptible, so no need to guard it; - direction flag is cleared by BIOS code, even on the XT. --- bin/sectorlisp.bin | Bin 512 -> 512 bytes sectorlisp.S | 6 +++--- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/bin/sectorlisp.bin b/bin/sectorlisp.bin index 4d759881fd35737b1376fe720e2bbe8f2f24f84d..f756d40c50249c7ba5aab715b86800d7b784e6c6 100755 GIT binary patch delta 444 zcmXAh!Alfj7{=d~odjDKTSGym_RwJmEcOEpHoiG|DTrF5T9cUVQhz{x zol=^6c19uW zhUaIqHTETaG2NXW^uA6^yoEaU13mz@g^v?H<{;?B8PMC_=Hf@5o$Xrn@e#yfpPREr z{n)JFqU9?rf_qrK5acK?$8e8=tnD7owS^IM@COB^W_Sf&EriaI;yE$TC?A$yIA?CJ zI~`r?v%L@N&cADhvs+q;(cdY>!f4=iI_l%S&QQ>!f4d|y#F{iFEgS~BT*O_{nI#qT z0b*;aaS@?%eJN!;2DjX+n3XT;jVw-g2*23yTziFjF za#6H0Ama5)@~7NzZpbpB!X)P-;wsMy#s{7AE>(wFs2Z|Rirr6WsjNA_B=b$NP&jga zzDa_*kE3Ag_p-n@q@lc)yCoudPFfqzf&O*!8*gF{l-*FYW5q~|?o48prYF6~{M^9n aWP2@h|6s-IOsnNjiOb915~;3xtN#H82;B$( delta 446 zcmXAjPe>a<6vk&4*I?8|3K|hxBVG(vY(S8e3H2rwX;V=XJR~=-9x|h+l0Xz(CJ2d` zJ$k7kvDKyYQhHg~Yi*lLDHKr=%rj#f|A0iTnU3`Gc)Z{DeeX-vrRo}Az8FW7sN9Df zPqxXQ{De{~M?uH@rt5l_=kHa)XMP!3`{0E~2xgI427%xyvYTNM@zYGntSx`X{&}^K zg*lXy+c^%*YpL77LTNdabs>hVEyW^wv0~QVEjnZj#u2}^dj(Zl2o6Nl0MaBCwx68Y zH}Ewn>;Uh>y(AG7&z#66t$(#cZ+J^AbFxG4hc$W@c`Gk>QNL z3){;tjS6X#(eK3|3+163#o}Qoi+r5>a;{{Z4{x;zz-UH--x64v(sq7Z&Xq&Ug#nSo z0g`~E2*ah|N9>InVW9^{qjbose`M)6+EVDO#k6$QCk13GUF{)1!>}&$QAwUy|6Py} zxi~K}qOw6eN-U#BJM0EGU46aK$}k=xkMVQTj{E8UQiYzF;7(7#hUl7!@y{{!ao{L*_;3X diff --git a/sectorlisp.S b/sectorlisp.S index 4d8e986..e6e095a 100644 --- a/sectorlisp.S +++ b/sectorlisp.S @@ -42,11 +42,11 @@ begin: xor %bx,%bx # we use the tiny memory model push %cs # that's the bios load address pop %es # therefore NULL points to NUL push %cs # terminated NIL string above! - cli # disables hardware interrupts + #cli # disables hardware interrupts pop %ss # disable nonmaskable ones too mov %bx,%sp # use highest address as stack - sti # reenable hardware interrupts - cld # normalize the direction flag + #sti # reenable hardware interrupts + #cld # normalize the direction flag inc %bx inc %bx main: mov $0x8000,%cx # dl (g_look) is zero or cr