[squeak-dev] The Trunk: MorphicExtras-hjh.210.mcz
commits at source.squeak.org
commits at source.squeak.org
Sat Sep 30 16:11:48 UTC 2017
David T. Lewis uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-hjh.210.mcz
==================== Summary ====================
Name: MorphicExtras-hjh.210
Author: hjh
Time: 30 September 2017, 11:55:17.310454 am
UUID: 3a05acb5-0d83-424c-8471-b7b5af288d35
Ancestors: MorphicExtras-tpr.209
A smoke test for Postscript support.
=============== Diff against MorphicExtras-tpr.209 ===============
Item was added:
+ TestCase subclass: #EPSCanvasTest
+ instanceVariableNames: ''
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'MorphicExtras-Postscript Canvases'!
Item was added:
+ ----- Method: EPSCanvasTest>>testSmokeTest (in category 'as yet unclassified') -----
+ testSmokeTest
+ | epsCode |
+ epsCode := (RectangleMorph new asEPS).
+
+ self assert: epsCode lines first = '%!!PS-Adobe-2.0 EPSF-2.0'.
+
+ self assert: (epsCode lines detect: [:line | line beginsWith: '%start morph: a RectangleMorph'] ifNone: [nil]) notNil.
+
+ self assert: epsCode lines last = '%%EOF'
+ !
More information about the Squeak-dev
mailing list
|