# HG changeset patch # User Claus Gittinger # Date 1561706016 -7200 # Node ID 63fdad4b773de6b102db41f7936428ac2d59e9cc # Parent 5eef58208eab9ff1fcb27844ed69b3259393e6b3 #OTHER by cg self class name -> self className diff -r 5eef58208eab -r 63fdad4b773d PPCompositeParser.st --- a/PPCompositeParser.st Tue May 28 03:27:12 2019 +0000 +++ b/PPCompositeParser.st Fri Jun 28 09:13:36 2019 +0200 @@ -1,5 +1,9 @@ +"{ Encoding: utf8 }" + "{ Package: 'stx:goodies/petitparser' }" +"{ NameSpace: Smalltalk }" + PPDelegateParser subclass:#PPCompositeParser instanceVariableNames:'dependencies' classVariableNames:'' @@ -130,9 +134,11 @@ !PPCompositeParser methodsFor:'querying'! dependencyAt: aClass - "Answer the dependent parser aClass. Throws an error if this parser class is not declared in the method #dependencies on the class-side of the receiver." - - ^ dependencies at: aClass ifAbsent: [ self error: 'Undeclared dependency in ' , self class name , ' to ' , aClass name ] + "Answer the dependent parser aClass. Throws an error if this parser class is not declared in the method #dependencies on the class-side of the receiver." + + ^ dependencies at: aClass ifAbsent: [ self error: 'Undeclared dependency in ' , self className , ' to ' , aClass name ] + + "Modified: / 28-06-2019 / 09:12:51 / Claus Gittinger" ! productionAt: aSymbol @@ -169,14 +175,14 @@ !PPCompositeParser class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPCompositeParser.st,v 1.4 2014-03-04 14:33:36 cg Exp $' + ^ '$Header$' ! version_CVS - ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPCompositeParser.st,v 1.4 2014-03-04 14:33:36 cg Exp $' + ^ '$Header$' ! version_SVN - ^ '$Id: PPCompositeParser.st,v 1.4 2014-03-04 14:33:36 cg Exp $' + ^ '$Id$' ! !