# New Ticket Created by Stuart Jansen
# Please include the string: [perl #49806]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=49806 >
The purpose of some tests is non-obvious. Add a short comment to each test
explaining why it was included.
---
languages/lolcode/t/01-vars.t | 3 ++-
languages/lolcode/t/02-functions.t | 1 +
languages/lolcode/t/03-if.t | 16 ++++++++++++++--
3 files changed, 17 insertions(+), 3 deletions(-)
diff --git a/languages/lolcode/t/01-vars.t b/languages/lolcode/t/01-vars.t
index b311601..675bcad 100644
--- a/languages/lolcode/t/01-vars.t
+++ b/languages/lolcode/t/01-vars.t
@@ -13,6 +13,7 @@ HAI 1.2
Q R 2
VISIBLE Q
+ BTW BARE EXPRESSIONS SET "IT"
"ok 3"
VISIBLE IT
@@ -25,7 +26,7 @@ HAI 1.2
I HAS A RESULT
VISIBLE RESULT
- BTW MULTIPLE DECLARATIONS WITH ASSIGNMENTS SHOULD
+ BTW MULTIPLE DECLARATIONS WITH ASSIGNMENTS SHOULD CLOBBER
I HAS A ANOTHER ITZ "not ok 6"
I HAS A ANOTHER ITZ "ok 6"
VISIBLE ANOTHER
diff --git a/languages/lolcode/t/02-functions.t b/languages/lolcode/t/02-functions.t
index 101b3d9..1a55131 100644
--- a/languages/lolcode/t/02-functions.t
+++ b/languages/lolcode/t/02-functions.t
@@ -1,6 +1,7 @@
HAI 1.2
VISIBLE "1..1"
+ BTW SANITY CHECK
HOW DUZ I foo
VISIBLE "ok 1"
IF U SAY SO
diff --git a/languages/lolcode/t/03-if.t b/languages/lolcode/t/03-if.t
index 62bb20e..3c178d2 100644
--- a/languages/lolcode/t/03-if.t
+++ b/languages/lolcode/t/03-if.t
@@ -1,6 +1,7 @@
HAI 1.2
VISIBLE "1..14"
+ BTW SANITY CHECK
WIN
O RLY?
YA RLY
@@ -9,6 +10,7 @@ HAI 1.2
VISIBLE "nok 1"
OIC
+ BTW ANOTHER SANITY CHECK
FAIL
O RLY?
YA RLY
@@ -17,6 +19,7 @@ HAI 1.2
VISIBLE "ok 2"
OIC
+ BTW DON'T BLINDLY EVALUATE THE SECOND BLOCK AFTER FAIL
FAIL
O RLY?
YA RLY
@@ -29,6 +32,7 @@ HAI 1.2
VISIBLE "nok 3"
OIC
+ BTW BARE EXPRESSION SHOULD SET IT EVEN IF PART OF O RLY?
4
O RLY?
YA RLY
@@ -37,6 +41,7 @@ HAI 1.2
VISIBLE "nok 4"
OIC
+ BTW ZERO IS FAIL
0
O RLY?
YA RLY
@@ -45,6 +50,7 @@ HAI 1.2
VISIBLE "ok 5"
OIC
+ BTW NON-EMPTY YARN IS WIN
"ok 6"
O RLY?
YA RLY
@@ -53,6 +59,7 @@ HAI 1.2
VISIBLE "nok 6"
OIC
+ BTW EMPTY YARN IS FAIL
""
O RLY?
YA RLY
@@ -61,6 +68,7 @@ HAI 1.2
VISIBLE "ok " IT "7"
OIC
+ BTW IGNORE MEBBE AFTER WIN
"ok 8"
O RLY?
YA RLY
@@ -71,6 +79,7 @@ HAI 1.2
VISIBLE "nok 8"
OIC
+ BTW VARIABLES CAN BE USED WITH O RLY?
I HAS A CHEEZBURGER ITZ FAIL
CHEEZBURGER
O RLY?
@@ -80,6 +89,7 @@ HAI 1.2
VISIBLE "ok 9"
OIC
+ BTW MORE FUN WITH VARIABLEs
CHEEZBURGER R "ok 10"
CHEEZBURGER
O RLY?
@@ -89,6 +99,7 @@ HAI 1.2
VISIBLE "nok 10"
OIC
+ BTW BARE EXPRESSIONS IN o RLY? CHANGE VALUE OF IT
WIN
O RLY?
YA RLY
@@ -99,8 +110,8 @@ HAI 1.2
VISIBLE IT
OIC
+ BTW CHECK PROPER HANDLING OF IT
"ok 12"
-
IT
O RLY?
YA RLY
@@ -110,7 +121,7 @@ HAI 1.2
VISIBLE "nok 12"
"nok 12"
OIC
-
+ BTW KEEP THESE TESTS TOGETHER
IT
O RLY?
YA RLY
@@ -119,6 +130,7 @@ HAI 1.2
VISIBLE "nok 13"
OIC
+ BTW NESTED O RLY?
FAIL
O RLY?
YA RLY
