--- a/SmalltalkLanguage.st	Mon May 12 22:53:45 2014 +0200
+++ b/SmalltalkLanguage.st	Mon May 12 22:53:48 2014 +0200
@@ -149,6 +149,13 @@
 
 !SmalltalkLanguage methodsFor:'source queries'!
 
+commentStrings
+    ^ #(
+            '"/'          "/ EOL comment
+            ('"' '"')     "/ normal comment   
+        )
+!
+
 methodDefinitionTemplateForSelector:aSelector andArgumentNames:argNames
     "given a selector, return a prototype definition string"
 
@@ -188,14 +195,14 @@
 !SmalltalkLanguage class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkLanguage.st,v 1.22 2014-01-23 12:58:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkLanguage.st,v 1.23 2014-05-12 20:53:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkLanguage.st,v 1.22 2014-01-23 12:58:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SmalltalkLanguage.st,v 1.23 2014-05-12 20:53:48 cg Exp $'
 !
 
 version_SVN
-    ^'$Id: SmalltalkLanguage.st,v 1.22 2014-01-23 12:58:34 stefan Exp $'
+    ^'$Id: SmalltalkLanguage.st,v 1.23 2014-05-12 20:53:48 cg Exp $'
 ! !