From: Thomas Walker Lynch <eknp9n@reasoningtechnology.com>
Date: Sat, 5 Apr 2025 10:10:49 +0000 (+0000)
Subject: workign try_TM_1.cli.c
X-Git-Url: https://git.reasoningtechnology.com/style/rt_dark_doc.css?a=commitdiff_plain;h=47a070be584db45bbe2b946fc20fc2e4d4a57ee3;p=N

workign try_TM_1.cli.c
---

diff --git a/developer/example/try_TM_1.cli.c b/developer/example/try_TM_1.cli.c
index 6f15490..8a6b8c5 100644
--- a/developer/example/try_TM_1.cli.c
+++ b/developer/example/try_TM_1.cli.c
@@ -2,6 +2,7 @@
   try_TM.cli.c - Example use of TM·AU type with array backend.
 */
 
+#include <stdio.h>
 #include "cpp_ext.c"
 #include "TM.lib.c"
 
@@ -24,8 +25,9 @@ int main(){
     do{
       printf( "%02x" , (unsigned int) Binding·call(tm ,read) );
       if( Binding·call(tm ,on_rightmost) ) break;
+      putchar(' ');
       Binding·call(tm ,step);
-    }
+    }while(1);
     printf("\n");
   }