From 36e7c28531ee7bade9506144f48afed4c7ccd874 Mon Sep 17 00:00:00 2001 From: Julian Blake Kongslie Date: Sat, 5 Nov 2022 11:32:21 -0700 Subject: Rename/remove some of the example programs --- programs/echo_optimal.pal | 67 ----------------------------------------------- 1 file changed, 67 deletions(-) delete mode 100644 programs/echo_optimal.pal (limited to 'programs/echo_optimal.pal') diff --git a/programs/echo_optimal.pal b/programs/echo_optimal.pal deleted file mode 100644 index 89a1fea..0000000 --- a/programs/echo_optimal.pal +++ /dev/null @@ -1,67 +0,0 @@ -/ vim: set sw=8 noexpandtab : - -*000 - -INTRET, 0 - JMP GOTINT - -*010 - -HEAD, 7777 / because preincrement -TAIL, 7777 - -*100 - -TTBUSY, 0 - -*200 - - CLA IAC - KIE - ION -LOOP, CLA - TAD TTBUSY - SZA - JMP LOOP - TAD TAIL - CMA IAC - TAD HEAD - SNA - JMP LOOP - CLA - CDF 0010 - TAD I TAIL - CDF 0000 - IOF / critical section - TPC - CLA IAC - ION - DCA TTBUSY / end critical section - JMP LOOP - -*400 - -GOTINT, DCA SAVEA - GTF - AND (7577) - DCA SAVEF - TSF - JMP KBIN - DCA TTBUSY - TCF -KBIN, KSF - JMP RETINT - KRB - CDF 0010 - DCA I HEAD - CDF 0000 -RETINT, CLA - TAD SAVEF - RTF - CLA - TAD SAVEA - ION - JMP I INTRET - -SAVEA, 0 -SAVEF, 0 -- cgit v1.2.3