Removed leftover Smalltalk/X-ism: end-of-line comments.
Not supported by Pharo.
--- a/extensions.st Sun Oct 05 00:29:07 2014 +0100
+++ b/extensions.st Sat Oct 04 23:34:14 2014 +0100
@@ -83,21 +83,14 @@
!PositionableStream methodsFor:'*petitparser-core-converting'!
asPetitStream
- "Some of my subclasses do not use the instance-variables collection, position and readLimit but instead have a completely different internal representation. In these cases just use the super implementation that is inefficient but should work in all cases."
-
- "DUNNO WHY, but on: collection from: position to: last set the start to position -1"
- self breakPoint: #petitparser.
+ "Some of my subclasses do not use the instance-variables collection, position and readLimit but instead have a completely different internal representation. In these cases just use the super implementation that is inefficient but should work in all cases."
- ^ (collection isNil or: [ position isNil or: [ readLimit isNil ] ])
- ifFalse: [ PPStream on: collection from: (position +1) to: readLimit ]
- ifTrue: [ super asPetitStream ]
-
-
-"/ ^ (collection isNil or: [ position isNil or: [ readLimit isNil ] ])
-"/ ifFalse: [ PPStream on: collection from: position to: readLimit ]
-"/ ifTrue: [ super asPetitStream ]
+ ^ (collection isNil or: [ position isNil or: [ readLimit isNil ] ])
+ ifFalse: [ PPStream on: collection from: ( position + 1 ) to: readLimit ]
+ ifTrue: [ super asPetitStream ]
"Modified: / 18-12-2010 / 17:38:01 / Jan Kurs <kurs.jan@post.cz>"
+ "Modified: / 04-10-2014 / 23:27:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!PositionableStream methodsFor:'*petitparser-core'!
--- a/stx_goodies_petitparser.st Sun Oct 05 00:29:07 2014 +0100
+++ b/stx_goodies_petitparser.st Sat Oct 04 23:34:14 2014 +0100
@@ -115,15 +115,6 @@
)
! !
-!stx_goodies_petitparser class methodsFor:'description - actions'!
-
-postLoadAction
-
- "/self classes do: [:cls|cls isLoaded ifFalse:[cls autoload]]
-
- "Created: / 17-12-2010 / 19:55:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
!stx_goodies_petitparser class methodsFor:'description - compilation'!
additionalRules_make_dot_proto
@@ -237,13 +228,6 @@
!stx_goodies_petitparser class methodsFor:'description - project information'!
-applicationIconFileName
- "Return the name (without suffix) of an icon-file (the app's icon); will be included in the rc-resource file"
-
- ^ nil
- "/ ^ self applicationName
-!
-
companyName
"Return a companyname which will appear in <lib>.rc"
@@ -268,13 +252,6 @@
"Modified: / 17-12-2010 / 19:43:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
-productInstallDirBaseName
- "Returns a default installDir which will appear in <app>.nsi.
- This is usually not the one you want to keep"
-
- ^ (self package asCollectionOfSubstringsSeparatedByAny:':/') last
-!
-
productName
"Return a product name which will appear in <lib>.rc"