From 76d010392ac9d5a52d754bbfb33e9cc721646cc4 Mon Sep 17 00:00:00 2001
From: Ian Flanigan <flan@google.com>
Date: Wed, 14 Nov 2018 20:25:12 +0000
Subject: [PATCH] Implement puth in plvm

This change adds a simple implementation of puth() that is just
printf("%04X", i). This corresponds with the native implementations
for both Apple and C64.
---
 src/vmsrc/plvm.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/vmsrc/plvm.c b/src/vmsrc/plvm.c
index 7cc2848..9f161c5 100755
--- a/src/vmsrc/plvm.c
+++ b/src/vmsrc/plvm.c
@@ -509,6 +509,10 @@ void call(uword pc)
             mem_data[0x1FF] = i;
             PUSH(0x1FF);
             break;
+        case 10: // LIBRARY STDLIB::PUTH
+            i = UPOP;
+            printf("%04X", i);
+            break;
         case 24: // LIBRARY CMDSYS::DIVMOD
             a = POP;
             b = POP;