compiler/tests/PPCompiledSmalltalkGrammarResource.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Sun, 26 Oct 2014 01:28:07 +0000
changeset 392 9b297f0d949c
parent 391 553a5456963b
child 418 b3080b20b14c
permissions -rw-r--r--
Fixed PPCNode>>doOptmizationLoop:status: Must report status to changeStatus as caller is checking its value. Also, added PPCOptimizationResult class>>new as Smaltalk/X (actually, most Smalltalks) does not call #initialize by default.

"{ Package: 'stx:goodies/petitparser/compiler/tests' }"

TestResource subclass:#PPCompiledSmalltalkGrammarResource
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'PetitCompiler-Tests-Smalltalk'
!

!PPCompiledSmalltalkGrammarResource methodsFor:'as yet unclassified'!

setUp
	| time |
	time := Time millisecondsToRun: [
	PPSmalltalkGrammar new compile: #PPCompiledSmalltalkGrammar
	].
	Transcript crShow: 'Grammar compiled in: ', time asString, 'ms'.
	
! !