The test_null word leaves null on the stack

exercism · Sep 21, 2023 · ea8e3e2 · ea8e3e2
1 parent fad2d6c
commit ea8e3e2
Show file tree

Hide file tree

Showing 24 changed files with 24 additions and 24 deletions.
diff --git a/exercises/practice/acronym/test-words.8th b/exercises/practice/acronym/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/affine-cipher/test-words.8th b/exercises/practice/affine-cipher/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/armstrong-numbers/test-words.8th b/exercises/practice/armstrong-numbers/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/atbash-cipher/test-words.8th b/exercises/practice/atbash-cipher/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/bob/test-words.8th b/exercises/practice/bob/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/collatz-conjecture/test-words.8th b/exercises/practice/collatz-conjecture/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/darts/test-words.8th b/exercises/practice/darts/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/gigasecond/test-words.8th b/exercises/practice/gigasecond/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/hamming/test-words.8th b/exercises/practice/hamming/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/hello-world/test-words.8th b/exercises/practice/hello-world/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/isogram/test-words.8th b/exercises/practice/isogram/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/leap/test-words.8th b/exercises/practice/leap/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/luhn/test-words.8th b/exercises/practice/luhn/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/pangram/test-words.8th b/exercises/practice/pangram/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/raindrops/test-words.8th b/exercises/practice/raindrops/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/resistor-color/test-words.8th b/exercises/practice/resistor-color/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/reverse-string/test-words.8th b/exercises/practice/reverse-string/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/roman-numerals/test-words.8th b/exercises/practice/roman-numerals/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/series/test-words.8th b/exercises/practice/series/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/triangle/test-words.8th b/exercises/practice/triangle/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/trinary/test-words.8th b/exercises/practice/trinary/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/two-fer/test-words.8th b/exercises/practice/two-fer/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/word-count/test-words.8th b/exercises/practice/word-count/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
 

diff --git a/exercises/practice/yacht/test-words.8th b/exercises/practice/yacht/test-words.8th
@@ -49,7 +49,7 @@ var tests-failed
 
 : test_null \ s w --
    w:exec
-   null?
+   null? nip
    if test-passed else test-failed then 
 ;
-Original file line number
+Diff line change
@@ Expand Up / @@ -49,7 +49,7 @@ var tests-failed @@
     : test_null \ s w --
        w:exec
-       null?
+       null? nip
        if test-passed else test-failed then
     ;
@@ Expand Down @@