Squeak-dev May 2005

squeak-dev@lists.squeakfoundation.org

153 participants
243 discussions

[Q] Squeak on Symbian
by Баскаков Даниил 31 May '05

31 May '05

Is it possible to run Squeak (or other Smalltalk) on Symbian? Are there any live projects? Is it difficult to build VM and prepare image by myself? Thanx...

3 2

box1.squeakfoundation.org:7777
by Jason Rogers 31 May '05

31 May '05

I think that box1.squeakfoundation.org:7777 is down. Can anyone look into this? -- Jason Rogers "I am crucified with Christ: nevertheless I live; yet not I, but Christ liveth in me: and the life which I now live in the flesh I live by the faith of the Son of God, who loved me, and gave himself for me." Galatians 2:20

2 2

[Q] on Windows Registry
by alr 31 May '05

31 May '05

I would like to write a small utility program for my job and i need to read the windows registry. I saw that Ned started a small changeset (Win32Registry-nk.cs attached) in 2002 but there was still a problem with it (could not coerce arguments exception). I do not know ffi enough and do not see exactly what the problem is. Did someone read the windows registry with squeak ? and How ? Your help would be very appreciated thanks Alain begin 666 Win32Registry-nk.cs M)T9R;VT@4W%U96%K,RXR(&]F(#$Q($IU;'D@,C P,B!;;&%T97-T('5P9&%T M93H@(S0Y-3)=(&]N(#<@4V5P=&5M8F5R(#(P,#(@870@,SHU,3HU,B!P;2<A M#2)#:&%N9V4@4V5T.@D)5VEN,S)296=I<W1R>2UN:PU$871E.@D)"3<@4V5P M=&5M8F5R(#(P,#(-075T:&]R.@D)"4YE9"!+;VYZ#0U4:&ES(&ES('1H92!S M=&%R="!O9B!A('!A8VMA9V4@=&AA="!W:6QL(&%L;&]W(&%C8V5S<PUT;R!T M:&4@5VEN9&]W<R!R96=I<W1R>2!F<F]M(%-Q=65A:R!U<VEN9R!&1DDN#0U( M;W=E=F5R+"!I="!D;V5S;B=T('=O<FL@>65T+@T-5')Y.@T-5VEN,S)296=I M<W1R>4ME>2!T97-T4F5G16YU;4ME>45X#0UA;F0@>6]U('=I;&P@<V5E('1H M870@:70@8V%N)W0@8V]E<F-E(&%R9W5M96YT<RX-#2(A#0U%>'1E<FYA;%-T M<G5C='5R92!S=6)C;&%S<SH@(U=I;C,R1FEL951I;64-"6EN<W1A;F-E5F%R M:6%B;&5.86UE<SH@)R<-"6-L87-S5F%R:6%B;&5.86UE<SH@)R<-"7!O;VQ$ M:6-T:6]N87)I97,Z("<G#0EC871E9V]R>3H@)T9&22U%>&%M<&QE<RU7:6XS M,B<A#5=I;C,R2&%N9&QE('-U8F-L87-S.B C5VEN,S)296=I<W1R>4ME>0T) M:6YS=&%N8V5687)I86)L94YA;65S.B G)PT)8VQA<W-687)I86)L94YA;65S M.B G)PT)<&]O;$1I8W1I;VYA<FEE<SH@)R<-"6-A=&5G;W)Y.B G1D9)+45X M86UP;&5S+5=I;C,R)R$-#2%7:6XS,D9I;&54:6UE(&UE=&AO9'-&;W(Z("=A M8V-E<W-I;F<G('-T86UP.B G;FL@.2\W+S(P,#(@,34Z,S,G(0UH:6=H#0DB M5&AI<R!M971H;V0@=V%S(&%U=&]M871I8V%L;'D@9V5N97)A=&5D(@T)7FAA M;F1L92!U;G-I9VYE9$QO;F=!=#H@-2$@(0T-(5=I;C,R1FEL951I;64@;65T M:&]D<T9O<CH@)V%C8V5S<VEN9R<@<W1A;7 Z("=N:R Y+S<O,C P,B Q-3HS M,R<A#6AI9V@Z(&%N3V)J96-T#0DB5&AI<R!M971H;V0@=V%S(&%U=&]M871I M8V%L;'D@9V5N97)A=&5D(@T):&%N9&QE('5N<VEG;F5D3&]N9T%T.B U('!U M=#H@86Y/8FIE8W0A("$-#2%7:6XS,D9I;&54:6UE(&UE=&AO9'-&;W(Z("=A M8V-E<W-I;F<G('-T86UP.B G;FL@.2\W+S(P,#(@,34Z,S,G(0UL;W<-"2)4 M:&ES(&UE=&AO9"!W87,@875T;VUA=&EC86QL>2!G96YE<F%T960B#0E>:&%N M9&QE('5N<VEG;F5D3&]N9T%T.B Q(2 A#0TA5VEN,S)&:6QE5&EM92!M971H M;V1S1F]R.B G86-C97-S:6YG)R!S=&%M<#H@)VYK(#DO-R\R,# R(#$U.C,S M)R$-;&]W.B!A;D]B:F5C= T)(E1H:7,@;65T:&]D('=A<R!A=71O;6%T:6-A M;&QY(&=E;F5R871E9"(-"6AA;F1L92!U;G-I9VYE9$QO;F=!=#H@,2!P=70Z M(&%N3V)J96-T(2 A#0T-(5=I;C,R1FEL951I;64@8VQA<W,@;65T:&]D<T9O M<CH@)V%S('EE="!U;F-L87-S:69I960G('-T86UP.B G;FL@.2\W+S(P,#(@ M,34Z,S,G(0UF:65L9',-"2)7:6XS,D9I;&54:6UE(&1E9FEN949I96QD<R(- M"5X@(R@C*"-L;W<@)W5L;VYG)RD@(R@C:&EG:" G=6QO;F<G*2 I(2 A#0TA M5VEN,S)&:6QE5&EM92!C;&%S<R!M971H;V1S1F]R.B G87,@>65T('5N8VQA M<W-I9FEE9"<@<W1A;7 Z("=N:R Y+S<O,C P,B Q-3HT,B<A#6EN:71I86QI M>F4-"7-E;&8@9&5F:6YE1FEE;&1S+B$@(0T-#2%7:6XS,E)E9VES=')Y2V5Y M(&UE=&AO9'-&;W(Z("=A<R!Y970@=6YC;&%S<VEF:65D)R!S=&%M<#H@)VYK M(#DO-R\R,# R(#$U.C0X)R$-87!I4F5G16YU;4ME>45X.B!H2V5Y(&EN9&5X M.B!I;F1E>"!N86UE.B!N86UE(&YA;653:7IE.B!N86UE4VEZ92!R97-E<G9E M9#H@<F5S97)V960@:V5Y0VQA<W,Z(&ME>4-L87-S(&ME>4-L87-S4VEZ93H@ M:V5Y0VQA<W-3:7IE(&QA<W17<FET951I;64Z(&QA<W17<FET951I;64-(DQ/ M3D<@4F5G16YU;4ME>45X* T@($A+15D@:$ME>2P@(" @(" @(" @+R\@:&%N M9&QE('1O(&ME>2!T;R!E;G5M97)A=&4-("!$5T]21"!D=TEN9&5X+" @(" @ M("\O(&EN9&5X(&]F('-U8FME>2!T;R!E;G5M97)A=&4-("!,4%135%(@;'!. M86UE+" @(" @("\O(&%D9')E<W,@;V8@8G5F9F5R(&9O<B!S=6)K97D@;F%M M90T@($Q01%=/4D0@;'!C8DYA;64L(" @+R\@861D<F5S<R!F;W(@<VEZ92!O M9B!S=6)K97D@8G5F9F5R#2 @3%!$5T]21"!L<%)E<V5R=F5D+" O+R!R97-E M<G9E9" H;75S="!B92!.54Q,*0T@($Q05%-44B!L<$-L87-S+" @(" @+R\@ M861D<F5S<R!O9B!B=69F97(@9F]R(&-L87-S('-T<FEN9PT@($Q01%=/4D0@ M;'!C8D-L87-S+" @+R\@861D<F5S<R!F;W(@<VEZ92!O9B!C;&%S<R!B=69F M97(-("!01DE,151)344@;'!F=$QA<W17<FET951I;64@#2 @(" @(" @(" @ M(" @(" @(" @(" O+R!A9&1R97-S(&9O<B!T:6UE(&ME>2!L87-T('=R:71T M96X@=&\-*3LB#0D\87!I8V%L;#H@;&]N9R G4F5G16YU;4ME>45X02<@*%=I M;C,R4F5G:7-T<GE+97D@=6QO;F<@8GET92H@=6QO;F<J('5L;VYG*B!B>71E M*B!U;&]N9RH@5VEN,S)&:6QE5&EM92HI(&UO9'5L93HG861V87!I,S(N9&QL M)SX-"5YS96QF(&5X=&5R;F%L0V%L;$9A:6QE9"$@(0T-#2%7:6XS,E)E9VES M=')Y2V5Y(&-L87-S(&UE=&AO9'-&;W(Z("=A<R!Y970@=6YC;&%S<VEF:65D M)R!S=&%M<#H@)VYK(#DO-R\R,# R(#$U.C$S)R$-:$ME>4-U<G)E;G1#;VYF M:6<-"5XQ-G(X,# P,# P-2$@(0T-(5=I;C,R4F5G:7-T<GE+97D@8VQA<W,@ M;65T:&]D<T9O<CH@)V%S('EE="!U;F-L87-S:69I960G('-T86UP.B G;FL@ M.2\W+S(P,#(@,34Z-#8G(0UT97-T4F5G16YU;4ME>45X#0T)(E=I;C,R4F5G M:7-T<GE+97D@=&5S=%)E9T5N=6U+97E%>"(-#7P@:V5Y;F%M92!N86UE4VEZ M92!K97E#;&%S<R!K97E#;&%S<U-I>F4@:6YD97@@9FEL951I;64@? UK97EN M86UE(%\@4W1R:6YG(&YE=SH@,3 P+@UN86UE4VEZ92!?(&YA;64@<VEZ92X- M:V5Y0VQA<W,@7R!3=')I;F<@;F5W.B Q,# N#6ME>4-L87-S4VEZ92!?(&ME M>4-L87-S('-I>F4N#6EN9&5X(%\@,"X-9FEL951I;64@7R!7:6XS,D9I;&54 M:6UE(&YE=RX-#5Y7:6XS,E)E9VES=')Y2V5Y(&YE=R!A<&E296=%;G5M2V5Y M17@Z(%=I;C,R4F5G:7-T<GE+97D@:$ME>4-U<G)E;G1#;VYF:6<@:6YD97@Z M(&EN9&5X(&YA;64Z(&ME>6YA;64@;F%M95-I>F4Z(&YA;653:7IE(')E<V5R M=F5D.B!N:6P@:V5Y0VQA<W,Z(&ME>4-L87-S(&ME>4-L87-S4VEZ93H@:V5Y M0VQA<W-3:7IE(&QA<W17<FET951I;64Z(&9I;&54:6UE+B$@(0T-5VEN,S)& 4:6QE5&EM92!I;FET:6%L:7IE(0T` ` end

2 4

[BUG] DockingBarMorph eating cpu in 3.9 alpha 6668
by alr 31 May '05

31 May '05

Hi it looks like DockingBarMorph menu in 3.9 alpha 6668 takes all cpu in displayWorld when moving the mouse.I don't know (yet) enough morphic to fix it. have a nice day everybody Cheers, Alain

3 2

Non sequential programming
by Matej Kosik 31 May '05

31 May '05

Hello all, These times we were playing with a different model of computation to which we all are used to. We believe that before we will be able to create cooperating distributed software (systems/programs) we have to throw away traditional sequential thinking. Now we are evaluating the prototype of such a programming platform, which is not only convenient (Smalltalk was also convenient) but also inherently parallel. At least, that is our immediate goal (conveniency & inherent parallelism). We have very strange feeling because doing everything from scratch is very suspicious. But, until know we did not find any other parallel language which would be - as consistent as Smalltalk - as convenient as Smalltalk - and of course parallel The experiments we have hitherto performed exhibit that the prototype based on the ideas we have got one year ago seem to be (until now) promising. Weird (but highly desirable) properties of the proposed parallel programming platform are: - interference over mutable shared objects is automatically excluded - deadlock as we know does not exist. These properties are ensured by the policy how it is possible to derive new capabilities from the old ones. We do not know if here are people who, similarly as us, know about Smalltalk (and any other inherently sequential language) constraints in the area of distributed computing. Currently the best source of information in written form about our system can be found here: http://altair.dcs.elf.stuba.sk/~kosik/esug2005.pdf (an ESUG 2005 research-track article candidate) Just in case someone wanted to download it, the whole implementation can be found here: http://altair.dcs.elf.stuba.sk/~kosik/squeak/V2.sar It works in Squeak 3.8 & 3.9 (due to one bug in 3.7, V2 does not work there) Test case classes `TestV2*' exhibit the correct behavior of the system. Particularly interesting might be - TestV215Workspace - TestV216Actor - TestV217Integer - TestV218Number - TestV219Magnitude - TestV220True - TestV221False - TestV222Point - TestV223Context - TestV224Iteration Perplexed records of interesting experiments can be also found here: http://altair.dcs.elf.stuba.sk/wiki/Kosik/Experiments http://altair.dcs.elf.stuba.sk/wiki/Kosik/Implementation Some are already out of date The syntax of the language is close to Smalltalk http://altair.dcs.elf.stuba.sk/wiki/Kosik/Syntax The semantics is somewhat analogous but yet very very different. Nice thing which misses is some functionality which would be able to generate state diagrams such as: http://altair.dcs.elf.stuba.sk/uploads/Kosik/equivalence6.png automatically. These were useful during debugging the virtual machine. They could also be useful during presentation. Drawing them manually is a burden. Excavate that information using Explorer tool from the my virtual machine is horrible task. Program could that do quickly. The problem is how to draw in those diagrams (actually special graphs) in clear way. I guess that to implement such a functionality could take about a month. If I had it, I would be able to flip forward (and perhaps backward) between the adjacent virtual machine states. Then it would be easy to explain the effects of the language. Squeak is perfect platform for such a thing. If anyone interested could look at the paper I have written http://altair.dcs.elf.stuba.sk/~kosik/esug2005.pdf and perhaps also at the implementation (see the test cases and `System class example*' methods) and give me some feedback, that would be very valuable for me - Do you thing that what I do is worthwhile? - What experiments should I try to do? - What is not clear in the article or what should be explained in more detail (I must admit that I am not a great writer) - Is there someone who has also the same goals as me and is working to realize them? - Any other good ideas? Thank you in advance -- Matej Kosik, icq://300133844, http://altair.dcs.elf.stuba.sk/wiki/Kosik/Main

5 6

Re: squeak on bsd (was: team laptop reports failure)
by jp1660＠att.net 31 May '05

31 May '05

I'm not sure what your issues are with Linux, but if it's security, I can't recommend OpenBSD enough. The previous release, 3.6 (3.7 just came out 19 May) has packages for Squeak 3.6 already set for use for most platforms, all you have to do is install them. IIRC, you live in Brazil, notes for ordering are here, http://www.openbsd.org/orders.html#brazil. It might be difficult to download as the new release just came out and the download servers seem to be swamped. -------------- Original message ---------------------- From: Jecel Assumpcao Jr <jecel(a)merlintec.com> > Bruce O'Neel wrote on Fri, 27 May 2005 12:59:03 +0000 > > You might, or might not, find it easier to use NetBSD. > > Thanks for the tip! I am reading the NetBSD manual now. I had already > checked out FreeBSD (after verifying that Ian had Squeak binaries for > that) but it seemed to have all the negative features of the main Linux > distributions that I was trying to avoid. > > > One of my back burner projects is an iso to install > > a Squeak Machine and one to install a Lisp machine. > > It's way back burner though. > > In the case of my web server I just need something that will work today, > but I have some older machines around that I want to play with and am > not in a hurry so I can check out far less polished alternatives. I am > particularly interested in trying to run Squeak on top of the Utah OSKit > (http://www.cs.utah.edu/flux/oskit/). There is already a "Scheme > machine" this way. > > A more conventional live CD Squeak might be easier to make starting from > Knoppix or some variation of it. > > -- Jecel >

5 4

xcode 2.0 and GCC 4.x and Squeak
by John M McIntosh 31 May '05

31 May '05

Managed to spend a few hours building a VM under Xcode 2.0 and GCC 4.x. I've posted a set of changes under the 3.8.8b3 series (unreleased) to get the VM to compile without too many warnings. Also I discovered and cross check with other developers that GCC 3.3 with '-fast' still produces the fastest assembler as compared to 4.x which does a lousy job without lots of hints. GCC 4.x on the other hand flagged a number of errors and pointed out the fetching of volume create dates was wrong. Further checking showed this never worked, and required a bit of tinkering to get the HFS+ 64bit date/time stamps into Squeak epoch date/times. All this plus the project updates have been posted to the SVN server. -- ======================================================================== === John M. McIntosh <johnmci(a)smalltalkconsulting.com> 1-800-477-2659 Corporate Smalltalk Consulting Ltd. http://www.smalltalkconsulting.com ======================================================================== ===

1 0

[BUG]UndefinedObject(Object)>>error:
by p.provoost＠rn.rabobank.nl 30 May '05

30 May '05

Hi All. I try to do a Smalltalk condenseSources on a fresh 3.8 final image and I get following error: 30 May 2005 9:06:02 am VM: Win32 - a SmalltalkImage Image: Squeak3.8 [latest update: #6665] SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir C:\squeak Trusted Dir C:\squeak\ProvoostP Untrusted Dir C:\My Squeak\ProvoostP UndefinedObject(Object)>>error: Receiver: nil Arguments and temporary variables: aString: 'Instances of UndefinedObject are not indexable' Receiver's instance variables: nil UndefinedObject(Object)>>errorNotIndexable Receiver: nil Arguments and temporary variables: Receiver's instance variables: nil UndefinedObject(Object)>>size Receiver: nil Arguments and temporary variables: Receiver's instance variables: nil FillInTheBlankMorph>>selectionInterval Receiver: a FillInTheBlankMorph(458) Arguments and temporary variables: Receiver's instance variables: bounds: 0@0 corner: 400@150 owner: nil submorphs: #(a SimpleButtonMorph<cancel>(3660) a SimpleButtonMorph<accept>(1633...etc... fullBounds: nil color: (Color r: 0.945 g: 0.942 b: 0.942) extension: a MorphExtension (1583) [other: (cornerStyle -> #rounded) (fillStyl...etc... borderWidth: 2 borderColor: #raised response: nil done: false textPane: nil responseUponCancel: '' --- The full stack --- UndefinedObject(Object)>>error: UndefinedObject(Object)>>errorNotIndexable UndefinedObject(Object)>>size FillInTheBlankMorph>>selectionInterval - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - PluggableTextMorph>>getSelection PluggableTextMorph>>on:text:accept:readSelection:menu: PluggableTextMorph class>>on:text:accept:readSelection:menu: FillInTheBlankMorph>>createTextPaneExtent:acceptBoolean:topOffset:button AreaHeight: FillInTheBlankMorph>>setQuery:initialAnswer:answerExtent:acceptOnCR: FillInTheBlankMorph class>>request:initialAnswer:centerAt:inWorld:onCancelReturn:acceptOnCR: answerExtent: FillInTheBlankMorph class>>request:initialAnswer:centerAt:inWorld:onCancelReturn:acceptOnCR: FillInTheBlankMorph class>>request:initialAnswer:centerAt:inWorld:onCancelReturn: FillInTheBlankMorph class>>request:initialAnswer:centerAt:inWorld: FillInTheBlankMorph class>>request:initialAnswer:centerAt: FillInTheBlank class>>request:initialAnswer:centerAt: FillInTheBlank class>>request:initialAnswer: SystemDictionary>>condenseSources UndefinedObject>>DoIt Compiler>>evaluate:in:to:notifying:ifFail:logged: [] in TextMorphEditor(ParagraphEditor)>>evaluateSelection {[rcvr class evaluatorClass new evaluate: self selectionAsStream in: ctxt...]} BlockContext>>on:do: TextMorphEditor(ParagraphEditor)>>evaluateSelection TextMorphEditor(ParagraphEditor)>>doIt [] in TextMorphEditor(ParagraphEditor)>>doIt: {[self doIt]} TextMorphEditor(Controller)>>terminateAndInitializeAround: TextMorphEditor(ParagraphEditor)>>doIt: TextMorphEditor(ParagraphEditor)>>dispatchOnCharacter:with: TextMorphEditor>>dispatchOnCharacter:with: TextMorphEditor(ParagraphEditor)>>readKeyboard TextMorphEditor>>readKeyboard [] in TextMorphForEditView(TextMorph)>>keyStroke: {[editor readKeyboard]} TextMorphForEditView(TextMorph)>>handleInteraction:fromEvent: TextMorphForEditView>>handleInteraction:fromEvent: TextMorphForEditView(TextMorph)>>keyStroke: TextMorphForEditView>>keyStroke: TextMorphForEditView(TextMorph)>>handleKeystroke: KeyboardEvent>>sentTo: TextMorphForEditView(Morph)>>handleEvent: TextMorphForEditView(Morph)>>handleFocusEvent: [] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self. ActiveEvent := anEvent. result := focusHolder han...]} [] in PasteUpMorph>>becomeActiveDuring: {[aBlock value]} BlockContext>>on:do: PasteUpMorph>>becomeActiveDuring: HandMorph>>sendFocusEvent:to:clear: HandMorph>>sendEvent:focus:clear: HandMorph>>sendKeyboardEvent: HandMorph>>handleEvent: HandMorph>>processEvents [] in WorldState>>doOneCycleNowFor: {[:h | ActiveHand := h. h processEvents. capturingGesture := capturingGest...]} Array(SequenceableCollection)>>do: WorldState>>handsDo: WorldState>>doOneCycleNowFor: WorldState>>doOneCycleFor: PasteUpMorph>>doOneCycle [] in Project class>>spawnNewProcess {[[World doOneCycle. Processor yield. false] whileFalse. nil]} [] in BlockContext>>newProcess {[self value. Processor terminateActive]} I use the 3.7.7 VM. After proceeding the condenseSources seems to succeed, however later in the browser the sources are corrupt. Can anybody confirm this behaviour? What is causing this? Cheers, P. Provoost. The Netherlands. p.provoost(a)rn.rabobank.nl

2 1

[BUG][FIX] SystemNavigation broken
by Andreas Raab 30 May '05

30 May '05

"Change Set: SysNavFix-ar Date: 28 May 2005 Author: Andreas Raab Fix a few uses of #isMemberOf: Symbol."! 'From Squeak3.8gamma of ''24 November 2004'' [latest update: #6662] on 28 May 2005 at 12:41:14 pm'! "Change Set: SysNavFix-ar Date: 28 May 2005 Author: Andreas Raab Fix a few uses of #isMemberOf: Symbol."! !SystemNavigation methodsFor: 'query' stamp: 'ar 5/28/2005 12:32'! allCallsOn: aLiteral "Answer a Collection of all the methods that call on aLiteral even deeply embedded in literal array." "self new browseAllCallsOn: #open:label:." | aCollection special thorough aList byte | aCollection _ OrderedCollection new. special _ Smalltalk hasSpecialSelector: aLiteral ifTrueSetByte: [:b | byte _ b]. thorough _ (aLiteral isSymbol) and: ["Possibly search for symbols imbedded in literal arrays" Preferences thoroughSenders]. Cursor wait showWhile: [self allBehaviorsDo: [:class | aList _ thorough ifTrue: [class thoroughWhichSelectorsReferTo: aLiteral special: special byte: byte] ifFalse: [class whichSelectorsReferTo: aLiteral special: special byte: byte]. aList do: [:sel | sel == #DoIt ifFalse: [aCollection add: (MethodReference new setStandardClass: class methodSymbol: sel)]]]]. ^ aCollection! ! !SystemNavigation methodsFor: 'query' stamp: 'ar 5/28/2005 12:33'! allSentMessagesWithout: classesAndMessagesPair "Answer the set of selectors which are sent somewhere in the system, computed in the absence of the supplied classes and messages." | sent absentClasses absentSelectors | sent _ IdentitySet new: CompiledMethod instanceCount. absentClasses _ classesAndMessagesPair first. absentSelectors _ classesAndMessagesPair second. self flag: #shouldBeRewrittenUsingSmalltalkAllClassesDo:. "sd 29/04/03" Cursor execute showWhile: [Smalltalk classNames do: [:cName | ((absentClasses includes: cName) ifTrue: [{}] ifFalse: [{Smalltalk at: cName. (Smalltalk at: cName) class}]) do: [:cl | (absentSelectors isEmpty ifTrue: [cl selectors] ifFalse: [cl selectors copyWithoutAll: absentSelectors]) do: [:sel | "Include all sels, but not if sent by self" (cl compiledMethodAt: sel) literals do: [:m | (m isSymbol) ifTrue: ["might be sent" m == sel ifFalse: [sent add: m]]. (m isMemberOf: Array) ifTrue: ["might be performed" m do: [:x | (x isSymbol) ifTrue: [x == sel ifFalse: [sent add: x]]]]]]]]. "The following may be sent without being in any literal frame" 1 to: Smalltalk specialSelectorSize do: [:index | sent add: (Smalltalk specialSelectorAt: index)]]. Smalltalk presumedSentMessages do: [:sel | sent add: sel]. ^ sent! !

6 8

[BUG][FIX] mimeTypesFor-brp
by Brent Pinkney 30 May '05

30 May '05

Change Set: mimeTypesFor-brp Date: 29 May 2005 Author: Brent Pinkney This change set fixes a bug where mimeTypesFor: unncecessarily computes the full file name for the argument in order to find the index of the extension. It then tries to find this offset in the smaller file name argument. This signals an error. e.g FileDirectory default mimeTypesFor: 'abc.png' Regards Brent

2 1

Jump to page: