From 2839c89b804fc7145735b5907cd809151190c571 Mon Sep 17 00:00:00 2001
From: Kartik Agaram <vc@akkartik.com>
Date: Sun, 4 Apr 2021 16:30:40 -0700
Subject: delete some obsolete files

They stopped working ever since boot.subx started relying on functions
(for the disk driver) implemented in Mu.
---
 boot.subx |  2 --
 ex1.subx  | 20 --------------------
 ex2.subx  | 32 --------------------------------
 3 files changed, 54 deletions(-)
 delete mode 100644 ex1.subx
 delete mode 100644 ex2.subx

diff --git a/boot.subx b/boot.subx
index 14b54480..6982fccb 100644
--- a/boot.subx
+++ b/boot.subx
@@ -838,8 +838,6 @@ Font:
   00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
 # }}}
 
-== code
-
 ## Controlling IDE (ATA) hard disks
 # Uses 28-bit PIO mode.
 # Inspired by https://colorforth.github.io/ide.html
diff --git a/ex1.subx b/ex1.subx
deleted file mode 100644
index bf6b5486..00000000
--- a/ex1.subx
+++ /dev/null
@@ -1,20 +0,0 @@
-# The simplest possible program: just an infinite loop.
-# All is well if your computer clears screen and hangs without restarting.
-# On an emulator the window may get bigger to accomodate the higher-resolution
-# graphics mode.
-#
-# To build a disk image:
-#   ./translate_subx boot.subx ex1.subx   # emits disk.img
-# To run:
-#   qemu-system-i386 disk.img
-# Or:
-#   bochs -f bochsrc                      # bochsrc loads disk.img
-
-== code
-
-Entry:
-  {
-    eb/jump loop/disp8
-  }
-
-# vim:ft=subx
diff --git a/ex2.subx b/ex2.subx
deleted file mode 100644
index 3a1f770e..00000000
--- a/ex2.subx
+++ /dev/null
@@ -1,32 +0,0 @@
-# Test out the video mode by filling in the screen with pixels.
-#
-# To build a disk image:
-#   ./translate_subx boot.subx ex2.subx   # emits disk.img
-# To run:
-#   qemu-system-i386 disk.img
-# Or:
-#   bochs -f bochsrc                      # bochsrc loads disk.img
-
-== code
-
-Entry:
-  # ecx <- start of video memory
-  8b/-> *Video-memory-addr 1/r32/ecx
-
-  # eax <- final pixel of video memory
-  8d/copy-address *(ecx + 0x0bffff) 0/r32/eax  # 0xbffff = 1024*768 - 1
-
-  # for each pixel in video memory
-  {
-    39/compare %eax 1/r32/ecx
-    7c/jump-if-< break/disp8
-    # write its column number to it
-    88/byte<- *eax 0/r32/AL
-    48/decrement-eax
-    eb/jump loop/disp8
-  }
-
-  # hang indefinitely
-  {
-    eb/jump loop/disp8
-  }
-- 
cgit 1.4.1-2-gfad0