From 5bccaff9f2c5a0adb2550e9a112144c2a012908c Mon Sep 17 00:00:00 2001
From: Simon Forman <sforman@hushmail.com>
Date: Sun, 12 Feb 2023 18:45:56 -0800
Subject: [PATCH] Conform!

cons and loop check type before number.
Don't print '<- top'.
---
 implementations/Python/joy.py | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/implementations/Python/joy.py b/implementations/Python/joy.py
index 080c485..96632d9 100755
--- a/implementations/Python/joy.py
+++ b/implementations/Python/joy.py
@@ -682,9 +682,6 @@ def repl(stack=(), dictionary=None):
         dictionary = {}
     try:
         while True:
-            print()
-            print(stack_to_string(stack), '<-top')
-            print()
             try:
                 text = input('joy? ')
             except (EOFError, KeyboardInterrupt):
@@ -695,6 +692,7 @@ def repl(stack=(), dictionary=None):
                 raise SystemExit from e
             except:
                 print_exc()
+            print(stack_to_string(stack))
     except SystemExit as e:
         raise SystemExit from e
     except:
@@ -919,9 +917,10 @@ def loop(stack, expr, dictionary):
               ...
 
     '''
-    quote, flag, stack = get_n_items(2, stack)
-    isnt_bool(flag)
+    quote, stack = get_n_items(1, stack)
     isnt_stack(quote)
+    flag, stack = get_n_items(1, stack)
+    isnt_bool(flag)
     if flag:
         expr = push_quote((quote, (S_loop, ())), expr)
         expr = push_quote(quote, expr)
@@ -993,8 +992,9 @@ def cons(stack):
     ( https://en.wikipedia.org/wiki/Cons#Lists ).
     Its inverse operation is uncons.
     '''
-    s0, a1, stack = get_n_items(2, stack)
+    s0, stack = get_n_items(1, stack)
     isnt_stack(s0)
+    a1, stack = get_n_items(1, stack)
     return ((a1, s0), stack)