Names to numbers: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,936: / Line 1,936: @@
 Finally, the compiled nest is executed with <code>do</code>.
-<lang Quackery>  [ 1 + ]                   is one          (     --> n   )
+<lang Quackery>
+  [ 1 + ]                   is one          (     --> n   )
   [ 2 + ]                   is two          (     --> n   )
   [ 3 + ]                   is three        (     --> n   )
@@ Line 1,969: / Line 1,970: @@
   [ thousand million ]      is billion      (   n --> n   )
-  [ 0 ]                     is ,            (     --> n   )
+  [ 0 0 ]                   is {{           (     --> n n )
+  [ + 0 ]                   is ,            ( n n --> n n )
-  [ this , ]                is {{           (     --> [ n )
+  [ + ]                     is }}           ( n n --> n   )
-  [ over ' {{ = iff
-      nip done
-    + again ]               is }}           ( [ * --> n   )
   [ $ "{{ " swap