From ea1c4003e4b4bbd35adf657778369e547ef0b751 Mon Sep 17 00:00:00 2001
From: David Schmenk <dschmenk@sbcglobal.net>
Date: Tue, 27 Oct 2015 09:49:13 -0700
Subject: [PATCH] Clean up source

---
 src/libsrc/fiber.pla | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/src/libsrc/fiber.pla b/src/libsrc/fiber.pla
index c0006b1..598fbd9 100644
--- a/src/libsrc/fiber.pla
+++ b/src/libsrc/fiber.pla
@@ -66,7 +66,7 @@ asm fbrSwap(saveVM, restoreVM)
     STA ESTK,Y
     DEY
     BPL -
-    TXA
++   TXA
     TAY
 -   LDA $100,Y
     STA (DST),Y
@@ -80,7 +80,6 @@ asm fbrSwap(saveVM, restoreVM)
     LDX HWSP
     TXS
     LDX ESP
-    LDY IPY
     RTS
 end
 //
@@ -231,7 +230,7 @@ export def fbrYield
     // Swap to text fiber if this isn't the only fiber RUNning
     //
     if fbrNext[fbrRunning] <> fbrRunning
-        prev      = fbrRunning
+        prev       = fbrRunning
         fbrRunning = fbrNext[fbrRunning]
 	return fbrSwap(fbrVMState[prev], fbrVMState[fbrRunning])
     fin