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_int.pal | 58 --------------------------------------------------- 1 file changed, 58 deletions(-) delete mode 100644 programs/echo_int.pal (limited to 'programs/echo_int.pal') diff --git a/programs/echo_int.pal b/programs/echo_int.pal deleted file mode 100644 index 62886ff..0000000 --- a/programs/echo_int.pal +++ /dev/null @@ -1,58 +0,0 @@ -/ vim: set sw=8 noexpandtab : - -*000 - -INTRET, 0 - JMP GOTINT - -*010 - -HEAD, 7777 / because preincrement -TAIL, 7777 - -*200 - - CLA IAC - KIE - ION - CLA -LOOP, TAD TAIL - CMA IAC - TAD HEAD - SNA - JMP LOOP - CLA - CDF 0010 - TAD I TAIL - CDF 0000 - IOF / critical section - TLS -BUSY, TSF / FIXME: remove busy wait inside IOF (see echo_optimal.pal) - JMP BUSY - TCF - ION - CLA / end critical section - JMP LOOP - -*400 - -SAVEA, 0 -SAVEF, 0 - -GOTINT, DCA SAVEA - GTF - AND (7577) - DCA SAVEF - KSF - JMP RETINT - KRB - CDF 0010 - DCA I HEAD - CDF 0000 -RETINT, CLA - TAD SAVEF - RTF - CLA - TAD SAVEA - ION - JMP I INTRET -- cgit v1.2.3