diff -r 1e45d3c96ec5 -r b5316ef15274 compiler/tests/extras/PPCLRPTimeoutTransition.st --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/compiler/tests/extras/PPCLRPTimeoutTransition.st Mon Aug 17 12:13:16 2015 +0100 @@ -0,0 +1,25 @@ +"{ Package: 'stx:goodies/petitparser/compiler/tests/extras' }" + +"{ NameSpace: Smalltalk }" + +PPCLRPTransition subclass:#PPCLRPTimeoutTransition + instanceVariableNames:'maxTime' + classVariableNames:'' + poolDictionaries:'' + category:'PetitCompiler-Extras-Tests-LRP' +! + +!PPCLRPTimeoutTransition methodsFor:'printing'! + +printOn: aStream + + aStream nextPutAll: 'PPCLRPTimeoutTransition '. + aStream nextPutAll: self name. + aStream nextPutAll: ' : '. + aStream nextPutAll: self from. + aStream nextPutAll: '->'. + aStream nextPutAll: self to. + aStream nextPutAll: ' on '. + aStream nextPutAll: self eventname asString. +! ! +