about summary refs log tree commit diff stats
path: root/405screen.mu
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-09-14 21:14:04 -0700
committerKartik Agaram <vc@akkartik.com>2020-09-14 21:14:04 -0700
commit6b41ca6d95bf6dbafab3fdc85d7355ac8b365931 (patch)
treeffab6daf3af380a661185d9b072d64640194c65c /405screen.mu
parent40d40b83decac3d4f9a3da2dc222d19d1ab704f1 (diff)
downloadmu-6b41ca6d95bf6dbafab3fdc85d7355ac8b365931.tar.gz
6777
Print answers in decimal in apps/arith.mu
Diffstat (limited to '405screen.mu')
-rw-r--r--405screen.mu15
1 files changed, 15 insertions, 0 deletions
diff --git a/405screen.mu b/405screen.mu
index f4171bc8..62bf1005 100644
--- a/405screen.mu
+++ b/405screen.mu
@@ -439,6 +439,21 @@ $print-int32-hex:body: {
 }
 }
 
+fn print-int32-decimal screen: (addr screen), n: int {
+$print-int32-decimal:body: {
+  compare screen, 0
+  {
+    break-if-!=
+    print-int32-decimal-to-real-screen n
+    break $print-int32-decimal:body
+  }
+  {
+    break-if-=
+    # fake screen
+  }
+}
+}
+
 fn reset-formatting screen: (addr screen) {
 $reset-formatting:body: {
   compare screen, 0