--- a/parsers/smalltalk/tests/PPSmalltalkGrammarTests.st Thu Nov 06 02:22:56 2014 +0000
+++ b/parsers/smalltalk/tests/PPSmalltalkGrammarTests.st Fri Nov 07 02:14:26 2014 +0000
@@ -112,6 +112,52 @@
rule: #expression
!
+testComment6a
+ "Tests Smalltalk/X EOL comments"
+ self
+ parse: '1+2"/ xxxxx'
+ rule: #expression.
+
+ "Created: / 07-11-2014 / 01:50:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+testComment6b
+ "Tests Smalltalk/X EOL comments"
+ self
+ parse: '1"/ xxxxx
+ +2 "/yyyy'
+ rule: #expression.
+
+ "Created: / 07-11-2014 / 01:50:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+testComment6c
+ "Tests Smalltalk/X EOL comments"
+ self
+ parse: ('1"/ xxxxx', (Character codePoint: 13) asString, ' + 1')
+ rule: #expression.
+
+ "Created: / 07-11-2014 / 01:51:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+testComment6d
+ "Tests Smalltalk/X EOL comments"
+ self
+ parse: ('1"/ xxxxx', (Character codePoint: 10) asString, ' + 1')
+ rule: #expression.
+
+ "Created: / 07-11-2014 / 01:51:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+testComment6e
+ "Tests Smalltalk/X EOL comments"
+ self
+ parse: ('1"/ xxxxx', (Character codePoint: 13) asString, (Character codePoint: 10) asString, ' + 1')
+ rule: #expression.
+
+ "Created: / 07-11-2014 / 01:51:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
testCompleteness
"This test asserts that all subclasses override all test methods."