From a64afe548600bb558a5291106768045bc1e8bd90 Mon Sep 17 00:00:00 2001
From: Steven Flintham <sgf@lemma.co.uk>
Date: Fri, 17 Jun 2022 19:51:48 +0100
Subject: [PATCH] Add putb() support to plvm.c
---
src/vmsrc/plvm.c | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/src/vmsrc/plvm.c b/src/vmsrc/plvm.c
index f20ac8f..9359ea4 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 9: // LIBRARY STDLIB::PUTB
+ i = UPOP;
+ printf("%02X", i);
+ break;
case 10: // LIBRARY STDLIB::PUTH
i = UPOP;
printf("%04X", i);