[squeak-dev] The Trunk: Compiler-mt.476.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Jun 8 08:42:27 UTC 2022
Marcel Taeumel uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-mt.476.mcz
==================== Summary ====================
Name: Compiler-mt.476
Author: mt
Time: 8 June 2022, 10:42:27.222735 am
UUID: d483550a-4266-d947-a037-f15166cb68c9
Ancestors: Compiler-ct.475
Remove dependency to 'ToolBuilder-Kernel' package.
=============== Diff against Compiler-ct.475 ===============
Item was changed:
----- Method: Parser>>defineClass: (in category 'error correction') -----
defineClass: className
"prompts the user to define a new class,
asks for it's category, and lets the users edit further
the definition"
| sym cat def d2 |
sym := className asSymbol.
+ cat := Project uiManager request: 'Enter class category : ' initialAnswer: self encoder classEncoding theNonMetaClass category.
- cat := UIManager default request: 'Enter class category : ' initialAnswer: self encoder classEncoding theNonMetaClass category.
cat
ifEmpty: [cat := 'Unknown'].
def := 'Object subclass: #' , sym , '
instanceVariableNames: ''''
classVariableNames: ''''
poolDictionaries: ''''
category: ''' , cat , ''''.
+ d2 := Project uiManager request: 'Edit class definition : ' initialAnswer: def.
- d2 := UIManager default request: 'Edit class definition : ' initialAnswer: def.
d2
ifEmpty: [d2 := def].
Compiler evaluate: d2.
^ encoder
global: (cue environment bindingOf: sym)
name: sym!
More information about the Squeak-dev
mailing list
|