Squeak-dev April 2017

squeak-dev@lists.squeakfoundation.org

48 participants
221 discussions

The Trunk: Kernel-eem.1082.mcz
by commits＠source.squeak.org 04 Apr '17

04 Apr '17

Eliot Miranda uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-eem.1082.mcz ==================== Summary ==================== Name: Kernel-eem.1082 Author: eem Time: 3 April 2017, 4:04:21.670959 pm UUID: 1438cc9f-a090-4294-9b73-bd409d2877a2 Ancestors: Kernel-eem.1081 Regularize literal printing for the Kernel literal classes. =============== Diff against Kernel-eem.1081 =============== Item was added: + ----- Method: Boolean>>printAsLiteralOn: (in category 'printing') ----- + printAsLiteralOn: aStream + ^self printOn: aStream! Item was added: + ----- Method: Float>>printAsLiteralOn: (in category 'printing') ----- + printAsLiteralOn: aStream + ^self storeOn: aStream base: 10! Item was added: + ----- Method: Integer>>printAsLiteralOn: (in category 'printing') ----- + printAsLiteralOn: aStream + ^self printOn: aStream base: 10! Item was added: + ----- Method: ScaledDecimal>>printAsLiteralOn: (in category 'printing') ----- + printAsLiteralOn: aStream + ^self printOn: aStream! Item was added: + ----- Method: UndefinedObject>>printAsLiteralOn: (in category 'printing') ----- + printAsLiteralOn: aStream + ^self printOn: aStream!

1 0

The Trunk: Tests-eem.375.mcz
by commits＠source.squeak.org 04 Apr '17

04 Apr '17

Eliot Miranda uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-eem.375.mcz ==================== Summary ==================== Name: Tests-eem.375 Author: eem Time: 3 April 2017, 4:00:50.101733 pm UUID: df4cfe45-7986-49dd-85e7-cf2ba01055f2 Ancestors: Tests-eem.374 Fix a regression in the DecompilerTests when running in the context of the entire test suite. =============== Diff against Tests-eem.374 =============== Item was changed: ----- Method: DecompilerTests>>classNames (in category 'utilities') ----- classNames "A list of the classes in most of the base packages; excluding EToys arbitrarily for now" ^Smalltalk globals allClassesAndTraits select: [:classOrTrait| #( 'Balloon' 'Chronology' 'Collections' 'CommandLine' 'Compiler' 'Compression' 'Environments' 'Exceptions' 'Files' 'GetText' 'Graphics' 'Help-' 'HelpSystem-' 'Installer-Core' 'Kernel-' 'KernelTests-' 'Monticello' 'Morphic-' 'MorphicExtras-' 'MorphicExtrasTests-' 'MorphicTests-' 'Multilingual' 'MultilingualTests' 'Nebraska' 'Network' 'NetworkTests' 'PackageInfo-Base' 'PreferenceBrowser' 'Protocols' 'Regex' 'ReleaseBuilder' 'SMBase' 'SMLoader' 'ST80' 'ST80Tests' 'ST80Tools' 'SUnit' 'ScriptLoader' 'Services-Base' 'Shout' 'Sound' 'Squeak-Version' 'SqueakSSL' 'System' 'Tests' 'ToolBuilder' 'Tools' 'Traits' 'TrueType' 'Universes' 'UpdateStream' 'VersionNumber' 'WebClient-' 'XML-') anySatisfy: [:packageRoot| + classOrTrait category ifNil: [false] ifNotNil: [:cat| cat beginsWith: packageRoot]]] - classOrTrait category beginsWith: packageRoot]] thenCollect: [:classOrTrait| classOrTrait name]!

1 0

Character space in literal arrays
by Eliot Miranda 03 Apr '17

03 Apr '17

Hi All, I'm cleaning up the decompiler and the changes back in 2015 for deciding which characters are literal or not affects e.g. Date>>printOn: :: printOn: aStream self printOn: aStream format: #(1 2 3 $ 3 1 ) This currently decompiles as printOn: aStream self printOn: aStream format: ((Array new: 6) at: 1 put: 1; at: 2 put: 2; at: 3 put: 3; at: 4 put: Character space; at: 5 put: 3; at: 6 put: 1; yourself) I see four approaches 1. live with it 2. add an exception to LiteralNode>>printOn:indent: that invokes a special case Array print routine that forces printing as a Literal (this also requires special case printing in Character; I suggest we refactor all literal printing as printAsLiteralOn: if we take this approach) 3. relent and allow space (but no other whitespace character) to be considered as a literal 4. make an exception for Character space only when being printed in an Array: shouldBePrintedAsLiteralVisiting: aSet ^self shouldBePrintedAsLiteral or: [self == Character space] 2. is I think the nicer. It would allow LiteralNode to insist that a literal print itself as literal and hence would correctly decompile e.g. the legal (but rightly disapproved of) shouldBePrintedAsLiteralVisiting: aSet ^self shouldBePrintedAsLiteral or: [self == $ ] Thoughts, opinions? _,,,^..^,,,_ best, Eliot

3 6

The Trunk: Tests-eem.374.mcz
by commits＠source.squeak.org 03 Apr '17

03 Apr '17

Eliot Miranda uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-eem.374.mcz ==================== Summary ==================== Name: Tests-eem.374 Author: eem Time: 3 April 2017, 2:08:08.542853 pm UUID: 8ff1a1ea-af44-4578-8594-782f63d0f0eb Ancestors: Tests-eem.373 Revamp the DecompilerTests given the changes in Compiler-eem.337. Exclude classes in EToys and a few others from the decompiler tests for now. =============== Diff against Tests-eem.373 =============== Item was changed: ----- Method: DecompilerTests>>checkDecompileMethod: (in category 'utilities') ----- checkDecompileMethod: oldMethod | cls selector oldMethodNode methodNode newMethod oldCodeString newCodeString | cls := oldMethod methodClass. selector := oldMethod selector. oldMethodNode := (cls decompilerClass new withTempNames: oldMethod methodNode schematicTempNamesString) decompile: selector in: cls method: oldMethod methodForDecompile. [oldMethodNode properties includesKey: #warning] whileTrue: [oldMethodNode properties removeKey: #warning]. oldCodeString := oldMethodNode decompileString. methodNode := [cls newCompiler compile: oldCodeString in: cls notifying: nil ifFail: []] on: SyntaxErrorNotification do: [:ex| ex errorMessage = 'Cannot store into' ifTrue: [ex return: #badStore]. ex pass]. "Ignore cannot store into block arg errors; they're not our issue." methodNode ~~ #badStore ifTrue: [newMethod := methodNode generate. newCodeString := ((cls decompilerClass new withTempNames: methodNode schematicTempNamesString) decompile: selector in: cls method: newMethod methodForDecompile) decompileString. "(StringHolder new textContents: (TextDiffBuilder buildDisplayPatchFrom: oldCodeString to: newCodeString)) openLabel: 'Decompilation Differences for ', cls name,'>>',selector" "(StringHolder new textContents: (TextDiffBuilder buildDisplayPatchFrom: oldMethod abstractSymbolic to: newMethod abstractSymbolic)) openLabel: 'Bytecode Differences for ', cls name,'>>',selector" + self assert: (oldCodeString = newCodeString + or: [(Scanner new scanTokens: oldCodeString) = (Scanner new scanTokens: newCodeString)]) - self assert: oldCodeString = newCodeString description: cls name asString, ' ', selector asString resumable: true]! Item was changed: ----- Method: DecompilerTests>>classNames (in category 'utilities') ----- classNames + "A list of the classes in most of the base packages; excluding EToys arbitrarily for now" + ^Smalltalk globals allClassesAndTraits + select: + [:classOrTrait| + #( 'Balloon' + 'Chronology' 'Collections' 'CommandLine' 'Compiler' 'Compression' + 'Environments' 'Exceptions' + 'Files' + 'GetText' 'Graphics' 'Help-' 'HelpSystem-' + 'Installer-Core' + 'Kernel-' 'KernelTests-' + 'Monticello' + 'Morphic-' 'MorphicExtras-' 'MorphicExtrasTests-' 'MorphicTests-' + 'Multilingual' 'MultilingualTests' + 'Nebraska' 'Network' 'NetworkTests' + 'PackageInfo-Base' 'PreferenceBrowser' 'Protocols' + 'Regex' + 'ReleaseBuilder' + 'SMBase' 'SMLoader' 'ST80' 'ST80Tests' 'ST80Tools' 'SUnit' 'ScriptLoader' 'Services-Base' 'Shout' + 'Sound' 'Squeak-Version' 'SqueakSSL' 'System' + 'Tests' 'ToolBuilder' 'Tools' 'Traits' 'TrueType' + 'Universes' 'UpdateStream' 'VersionNumber' + 'WebClient-' + 'XML-') anySatisfy: + [:packageRoot| + classOrTrait category beginsWith: packageRoot]] + thenCollect: + [:classOrTrait| classOrTrait name]! - - ^Smalltalk globals classAndTraitNames! Item was changed: ----- Method: DecompilerTests>>decompilerFailures (in category 'utilities') ----- decompilerFailures "Here is the list of failures: either a syntax error, a hard error or some failure to decompile correctly. Collected via DecompilerTestFailuresCollector new computeFailures." "class name, selector, error class name or nil" ^ #( #(Behavior toolIconSelector: TestFailure) #(BrowserCommentTextMorph showPane SyntaxErrorNotification) - #(ClassDescription replaceSilently:to: SyntaxErrorNotification) #(CodeHolder getSelectorAndSendQuery:to:with: SyntaxErrorNotification) - #(Date printOn: TestFailure) #(DecompilerTests testDecompileUnreachableParameter Error) - #(FontImporterTool fontFromFamily: SyntaxErrorNotification) "same-name block-local temps in optimized blocks" #(HttpUrl checkAuthorization:retry: TestFailure) - #(LargeNegativeIntegerTest testReplaceFromToWithStartingAt SyntaxErrorNotification) "same-name block-local temps in optimized blocks" - #(LargePositiveIntegerTest testReplaceFromToWithStartingAt SyntaxErrorNotification) "same-name block-local temps in optimized blocks" - #(MailComposition breakLinesInMessage: SyntaxErrorNotification) #(MCConfigurationBrowser post SyntaxErrorNotification) #(MVCToolBuilder setLayout:in: SyntaxErrorNotification) "same-name block-local temps in optimized blocks" + #(ParseNodeBuilder variable: TestFailure) "Almost fully returning if's result in a nil node." - #(ParagraphEditor inOutdent:delta: SyntaxErrorNotification) #(PNGReadWriter copyPixelsGray: SyntaxErrorNotification) #(ProtoObjectTest testIfNilIfNotNil SyntaxErrorNotification) #(ProtoObjectTest testIfNotNil SyntaxErrorNotification) + #(ProtoObjectTest testIfNotNilIfNil SyntaxErrorNotification) - #(ProtoObjectTest testIfNotNilIfNil SyntaxErrorNotification) - #(RxsCharSet enumerablePartPredicateIgnoringCase: SyntaxErrorNotification) - #(ScaledDecimalTest testConvertFromFraction SyntaxErrorNotification) "local/non-local temps" #(SHMCClassDefinition withAllSuperclassesDo: SyntaxErrorNotification) "same-name block-local temps in optimized blocks" - #(StandardScriptingSystem holderWithAlphabet SyntaxErrorNotification) "same-name block-local temps in optimized blocks" - #(SyntaxMorph mouseEnterDragging: SyntaxErrorNotification) - #(SystemWindow convertAlignment SyntaxErrorNotification) - #(TextEditor inOutdent:delta: SyntaxErrorNotification) #(TextURL actOnClickFor: TestFailure) #(TTContourConstruction segmentsDo: SyntaxErrorNotification) "Worth fixing; these two are mistaken conversion from a whileTrue: to a to:do: but the index is used outside the whileTrue:" #(TTFontReader processHorizontalMetricsTable:length: SyntaxErrorNotification) #(WeakSet scanForLoadedSymbol: TestFailure))!

1 0

Squeaksource.com swiki formatting ?
by tim Rowledge 03 Apr '17

03 Apr '17

I’ve been updating the project page for the WeatherStation project (latest release now available for your weather-obsessing pleasure!) and made the brave decision to edit the attached swiki to include the Python and Arduino code for some of the sensors. For reasons I don’t get, the <code> tags don’t stop the comment lines starting with $# from getting listified, nor the formatting {0:0.2f} from being smilified. Does anyone know how to work around that? Swiki page in question at http://www.squeaksource.com/@Ut-0Uqn7YfXwOgK9/FNflYLS5 tim -- tim Rowledge; tim(a)rowledge.org; http://www.rowledge.org/tim Success always occurs in private, and failure in full view.

5 6

Re: [squeak-dev] Squeak 6 kernel changes, ContextPart+MethodContext -> Context
by Jakob Reschke 03 Apr '17

03 Apr '17

I use break on entry often because I do not like the method versions being cluttered with "halt versions". Unfortunately the #breaks are slipping in anyway, when I then edit the code in the debugger and forget about the break. :-( A confirmation dialog would be nice if a wrapped method is saved and the break is still in the source. Am 31.03.2017 15:47 schrieb "Bert Freudenberg" <bert(a)freudenbergs.de>: > On Thu, Mar 30, 2017 at 12:01 AM, Tobias Pape <Das.Linux(a)gmx.de> wrote: > >> >> > On 29.03.2017, at 23:56, Levente Uzonyi <leves(a)caesar.elte.hu> wrote: >> > >> > Inserting `self half` is still superior. >> >> If i want to half myself, sure ;) >> >> Well, I'd say, it depends. If I'm just exploring the system and dont want >> to change it, I typically use break on enty. >> > > I'd like to have proper breakpoints that are as convenient as "self halt" > but don't modify the method source. > > - Bert - >

2 1

Re: [squeak-dev] List of all global variables? (Environments?)
by Jakob Reschke 03 Apr '17

03 Apr '17

Am 03.04.2017 19:12 schrieb "H. Hirzel" <hannes.hirzel(a)gmail.com>: (Smalltalk globals select: [:k | ((Smalltalk at: k) isKindOf: Class) not]) collect: [:k | k -> (Smalltalk at: k) class] Then I get 'key not found: ExtendedNumberParser'. Cannot verify this atm but I think k is the class (value), not the symbol (key), and at: wants a key. Like a Dictionary.

1 0

Should a long running image notice daylight saving?
by Herbert König 03 Apr '17

03 Apr '17

Hi all, I have a long running 5.1 image on a Raspi A+ which regularly waits on a Delay. Raspbian has noticed daylight saving, Squeak not. Is this expected and what can I do with the running image to make it notice? Except waiting for the monthly crash and restart :-) Cheers, Herbert

6 11

Squeaksource.com swiki formatting ?
by Chris Cunnington 03 Apr '17

03 Apr '17

TinyWiki has a class called TWSmiley. Your WeatherPI code link leads to a page that is activating TWSmiley class>>#binaryShocked four times. That is to say, every time the parser sees :0 it creates a round, blue gif of a shocked smiley. When you write in code {0:0.2f} the third and fourth characters are replaced with a blue smiley face. Adding a space after the colon would probably fix that. I guess Lukas Renggli was in all ways younger in 2004. http://www.squeaksource <http://www.squeaksource/>.com/WeatherStation Chris

1 0

Squeaksource.com swiki formatting ?
by Chris Cunnington 02 Apr '17

02 Apr '17

SqueakSource doesn’t use a Swiki, which is very large. It uses a TinyWiki object for each project, which does not have any wiki syntax tokens for the <code> tag. TWScanner>>#scannerDefinitionComment "<newline> : \r? \n | \r ; <blankLine> : <newline> <newline> ; <rule> : \_[\ \t]* ; <header> : \!+ ; <list> : [\#\-\=] ; <linkText> : [^\*\r\n] ; <link> : \* <linkText>+ \* ; <nonLinkStart> : \*\* | \\ [\#\-\=\!\*] ; <text> : [^\r\n\*\!\#\-\=\\]+ ; <any> : . ;” No bold, italic, pre or code tags. Off the top of my head, I'd suggest you leave a link and do the work on the Squeak Swiki. Put asterisks around your link. *http://wiki.squeak.org/squeak/Morphic* Or put code between rule tags created by underscores. _ Arduino code: // comment void loop { } _ Chris

1 0

Jump to page: