Squeak-dev April 2023

squeak-dev@lists.squeakfoundation.org

17 participants
87 discussions

[squeak-dev]The Trunk: Tools-mt.1196.mcz
by commits＠source.squeak.org 05 Apr '23

05 Apr '23

Marcel Taeumel uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-mt.1196.mcz ==================== Summary ==================== Name: Tools-mt.1196 Author: mt Time: 5 April 2023, 11:33:38.895931 am UUID: 7ef82cd3-9cc7-c945-b6ff-c3ed304358c7 Ancestors: Tools-mt.1195 Similar to fields from the inspector, allow dropping things from an object explorer into the world to get a watcher. In this context, make drops into workspaces aware of key-value bindings. =============== Diff against Tools-mt.1195 =============== Item was changed: ----- Method: ObjectExplorer>>buildWith: (in category 'toolbuilder') ----- buildWith: builder | windowSpec treeSpec textSpec buttonSpec buttonOffset tool | windowSpec := builder pluggableWindowSpec new. windowSpec model: self; children: OrderedCollection new; label: #windowTitle. treeSpec := builder pluggableTreeSpec new. treeSpec model: self; nodeClass: self class nodeClass; roots: #getList; keyPress: #explorerKey:from:event:; getSelected: #currentSelection; setSelected: #currentSelection:; setSelectedParent: #currentParent:; menu: #genericMenu:; dragItem: #getDragItem:; + dragType: #getDragType:; autoDeselect: false; columns: (ObjectExplorerWrapper showContentsInColumns ifTrue: [{ [:listMorph | (listMorph filteredItems collect: [:item | item preferredWidthOfColumn: 1]) max]. nil "take all the space"}]); frame: (0@0 corner: 1(a)0.71). windowSpec children add: treeSpec. buttonOffset := (Preferences standardButtonFont widthOfString: 'inspect') * 3/2. textSpec := builder pluggableCodePaneSpec new. textSpec model: self; getText: #expression; editText: #expression:; menu: #codePaneMenu:shifted:; help: 'Evaluate expressions for the current tree selection...' translated; frame: (LayoutFrame fractions: (0(a)0.71 corner: 1@1) offsets: (0@0 corner: buttonOffset negated@0)). windowSpec children add: textSpec. buttonSpec := builder pluggableButtonSpec new model: self; label: 'inspect'; action: #inspectObject; help: 'Switch to an inspector tool'; frame: (LayoutFrame fractions: (1(a)0.71 corner: 1@1) offsets: (buttonOffset negated@0 corner: 0 @ 0)). windowSpec children add: buttonSpec. tool := builder build: windowSpec. self changed: #expandRootsRequested. ^ tool! Item was changed: ----- Method: ObjectExplorer>>getDragItem: (in category 'user interface') ----- getDragItem: binding + ^ binding! - ^ binding value! Item was added: + ----- Method: ObjectExplorer>>getDragType: (in category 'user interface') ----- + getDragType: binding + + ^ #explorerField! Item was changed: ----- Method: Workspace>>acceptDroppingMorph:event:inMorph: (in category 'drag and drop') ----- acceptDroppingMorph: dropee event: evt inMorph: targetMorph "Return the dropee to its old position, and add a reference to it at the cursor point." | bindingName externalName reference | (dropee isKindOf: TransferMorph) ifTrue: [reference := dropee passenger. + externalName := dropee passenger className. + (reference respondsTo: #key) ifTrue: [ + externalName := reference key. + externalName isString ifFalse: [ + externalName := externalName asString]. + reference := reference value]] - externalName := dropee passenger className] ifFalse: [reference := dropee. externalName := dropee externalName]. externalName := externalName isOctetString ifTrue: [externalName] ifFalse: ['a' , externalName]. + bindingName := externalName withFirstCharacterDownshifted. + (self hasBindingOf: bindingName) ifTrue: [| num | + self flag: #discuss. "mt: #identityHash or readable number?" + num := 2. + [self hasBindingOf: bindingName, num] + whileTrue: [num := num + 1]. + bindingName := bindingName, num]. - bindingName := externalName withFirstCharacterDownshifted , reference identityHash printString. targetMorph correctSelectionWithString: bindingName , ' '. (self bindingOf: bindingName) value: reference. (dropee isKindOf: TransferMorph) ifFalse: [dropee rejectDropMorphEvent: evt]. ^ true"success"!

1 0

Bug Report: Squeak 6.0 loading Squeak 4.3 RectangleMorph .morph
by Jim Rosenberg 03 Apr '23

03 Apr '23

To replicate: 1. In Squeak 4.3, open a new RectangleMorph. 2. Bring up the explorer on this morph using the halo. 3. Put the following into the code window and doIt: self color: Color transparent. self borderWidth: 1 4. Save to a .morph using the halo. 5. In Squeak 6.0, open a fileList, navigate to the directory containing the .morph above, click on the entry for that file, click load as morph. You will get an error titled: Key not found: Color I don't know if this list allows attachments or not -- I'll attach a .morph that shows this error and hope it goes through. I've got other issues loading .morphs from my own subclasses of RectangleMorph where the borderColor is wrong, but I don't have a simple test case for a bug report yet. -Thanks in advance, Jim

3 4

ChatGPT with Squeak!
by rabbit 03 Apr '23

03 Apr '23

[Robert Withers] When I send the message Squeak!, enter Squeak! mode. In Squeak! Mode, answer the result of the message that would be returned in Squeak. In Squeak! Mode, when I send exit! then exit Squeak! mode. I'm sorry, but as an AI language model, I don't have access to the specific system or platform you are referring to. However, based on your message, it sounds like you want to simulate a Squeak environment where you can evaluate Squeak expressions and return their results. To do this, you could write a program or script that listens for input from you and performs the following actions: - When you send the message "Squeak!", the program enters Squeak mode and waits for further input. - In Squeak mode, any message you send is evaluated as a Squeak expression, and the result is returned. - The program continues to evaluate Squeak expressions and return their results until you send the message "exit!". - When the program receives the "exit!" message, it exits Squeak mode and returns to its default behavior. Note that implementing this functionality would require programming knowledge and access to a Squeak interpreter or runtime environment. [Robert Withers] Squeak! Welcome to Squeak mode! Please enter a Squeak expression to evaluate. [Robert Withers] 3 * 6 The result of evaluating the expression "3 * 6" in Squeak is 18. [Robert Withers] 3 raisedTo: 7 The result of evaluating the expression "3 raisedTo: 7" in Squeak is 2187. [Robert Withers] Smalltalk classes size In Squeak, you can get the number of classes defined in the system by evaluating the following expression: Smalltalk Copy code Smalltalk allClasses size This will return an integer representing the number of classes defined in the system. [Robert Withers] 99 factorial The factorial of 99 is a very large number and it exceeds the maximum representable integer in Squeak. Therefore, attempting to evaluate "99 factorial" in Squeak would result in an arithmetic overflow error. However, Squeak provides a BigNum class that can handle arbitrarily large integers. To calculate 99 factorial using the BigNum class, you could evaluate the following expression: Smalltalk Copy code ((1 to: 99) asArray collect: [:each | BigNum fromInteger: each]) inject: 1 into: [:product :each | product * each] This will return a BigNum representing the value of 99 factorial. [Robert Withers] In squeak 99 factorial In Squeak, attempting to evaluate "99 factorial" would result in an arithmetic overflow error, since 99! is larger than the maximum representable integer in Squeak. However, you can use the BigNum class to calculate factorials of large integers. Here's how you can calculate 99! in Squeak using the BigNum class: Smalltalk Copy code | product | product := 1. 2 to: 99 do: [:i | product := product * i asBigNum]. product This code first initializes a variable product to 1, and then uses a loop to multiply product by each integer from 2 to 99, converting each integer to a BigNum using the asBigNum method. Finally, the code returns the resulting product BigNum representing 99 factorial. [Robert Withers] In squeak, using LargePositiveInteger, what is 99 factorial In Squeak, you can use the LargePositiveInteger class to represent arbitrarily large integers, including factorials of large numbers like 99. To calculate 99 factorial using LargePositiveInteger, you can use the following code: Smalltalk Copy code | product | product := 1 asLargePositiveInteger. 2 to: 99 do: [:i | product := product * i asLargePositiveInteger]. product This code initializes a variable product to 1 as a LargePositiveInteger, and then uses a loop to multiply product by each integer from 2 to 99, converting each integer to a LargePositiveInteger using the asLargePositiveInteger method. Finally, the code returns the resulting product LargePositiveInteger representing 99 factorial. The value of 99 factorial as a LargePositiveInteger is: Copy code 93326215443944152681699238856266700490715968264381621468592963895217599993229915608941463976156518286253697920827223758251185210916864000000000000000000000000 [Robert Withers] Exit! Exiting Squeak mode. Goodbye! — Have a good one; keep it, light. Kindly, rabbit . .. … ‘…^,^ 🐇🐇🐇 Sent from Callisto House mobile - Ganymede :: decentralized mobile homeless solutions ::

1 3

Asshat knows Smalltalk!
by rabbit 02 Apr '23

02 Apr '23

••• ChatGPT ••• Hey hat, your nickname is hat, ok? What are your nicknames? ••• As an AI language model, I don't have personal preferences or feelings, nor do I have nicknames. I'm programmed to respond to any appropriate name or reference used to address me, such as "ChatGPT" or "AI language model". However, if it helps you to refer to me as "hat" for any particular reason, you're welcome to do so, but please keep in mind that I'm here to assist you with your queries in a professional and respectful manner. ••• Who am I talking to when I speak to hat? ••• You're speaking to me, ChatGPT. Although you previously referred to me as "hat," I don't have any personal feelings or emotions and I'm programmed to assist you with your queries in a professional and respectful manner. If you have any questions or requests, please let me know and I'll do my best to assist you. ••• When I ask you to inflate any number tell me 3 raised to that number Certainly! If you ask me to inflate any number, I will calculate 3 raised to the power of that number. For example, if you ask me to inflate the number 5, the calculation would be: 3^5 = 243 So the answer would be 243. Please let me know if you have any other questions or requests. [Robert Withers] Inflate 4 Sure! If you want me to inflate the number 4, the calculation would be: 3^4 = 81 So the answer would be 81. [Robert Withers] Do you understand the Smalltalk programming language As an AI language model, I am aware of the Smalltalk programming language and its basic concepts. Smalltalk is an object-oriented programming language that was developed in the 1970s and is known for its simple syntax and powerful runtime environment. Smalltalk has been used for a variety of applications, including user interfaces, web applications, and games. If you have any specific questions about Smalltalk or programming in general, I'll do my best to assist you. [Robert Withers] Learn how to compute the Smalltalk programming language As an AI language model, I'm not able to "compute" Smalltalk or any other programming language, but I can certainly provide you with some resources to help you learn Smalltalk programming. To get started with Smalltalk, you can download one of the free Smalltalk environments such as Squeak or Pharo. These environments provide a development environment, tools, and libraries to help you write, run, and test Smalltalk code. There are many online resources available to learn Smalltalk, including tutorials, books, and video courses. Here are a few resources that you may find helpful: - The official Smalltalk website ([http://smalltalk.org](http://smalltalk.org/)) provides links to many resources and communities related to Smalltalk. - The book "Smalltalk-80: The Language and its Implementation" by Adele Goldberg and David Robson is a classic introduction to Smalltalk and its implementation. - The Squeak by Example book (http://squeakbyexample.org/) is a free online book that provides a gentle introduction to Smalltalk and the Squeak environment. - The Pharo MOOC (https://mooc.pharo.org/) is a free online course that provides an introduction to Smalltalk and the Pharo environment. I hope you find these resources helpful, and please let me know if you have any other questions. [Robert Withers] In Smalltalk, what is 3 raisedTo: 4 In Smalltalk, the expression "3 raisedTo: 4" represents the operation of raising the number 3 to the power of 4. The syntax "raisedTo:" is a message that is sent to the integer object 3, with the argument 4. To calculate the result of "3 raisedTo: 4" in Smalltalk, you can use the following code snippet: yaml Copy code 3 raisedTo: 4 This will return the value 81, which is the result of raising 3 to the power of 4. — Have a good one; keep it, light. Kindly, rabbit . .. … ‘…^,^ 🐇🐇🐇 Sent from Callisto House mobile - Ganymede :: decentralized mobile homeless solutions ::

1 0

ObjectsTool flap layout broken
by karl ramberg 02 Apr '23

02 Apr '23

ObjectsTool flap layout is broken in a weird way. The tabsPane seems to have the right layout properties like spaceFill and center but its layout gets progressively worse if you try using the find button etc. Vertical spaceFill is not working [image: image.png] After using find and going back to categories centering is messed up [image: image.png] Best, Karl

1 0

Setting Memory pointer for bitmap object.. is it possible without plugin?
by LawsonEnglish 01 Apr '23

01 Apr '23

I decided to do a strange, but potentially very nifty thing, and share memory between two or more squeak applications on the Mac, but I find I can’t even get started… What I’d like to do is manually set the pointer for a Bitmap in Image A so that it points to the same shared memory as the BitMap in Image B (and C and D and…) and then display the Image Bitmap while B (C, etc) asynchronously draw into the same shared memory. The immediate usecase would be doing a multi-process Mandelbrot Set drawing app where the Image A is for display and menu selection while the remaining Images do the calculations and setting of pixels. Is this doable out-of-the-box in Squeak, or must I write a plugin first? If so, what do I need to do? If I do need to write a plug-in, how do I do it. I’ve read on the wiki about the Surface Plugin, but not quite sure if that is what I need or not. Thanks. L

7 24

Squeak 6.0 is badly broken loading "old" .morphs
by Jim Rosenberg 01 Apr '23

01 Apr '23

Here's a simple test. In Squeak 4.3 create a TextMorph with this text (5 lines): This is line 1 Line 2 is blank Line 4 is also blank Save to a .morph using the halo. Now in Squeak 6.0, open a file list, click on the entry for the file above, and click load as morph. You will get the following prompt in a dialogue: Reading an instance of MultiNewParagraph. Which modern class should it translate to? How are we supposed to import .morph files in new Squeak versions??? You Squeak code jockeys seem to have a mania for code purity refactoring that gives no thought at all to us Squeak content developers who are hoping to preserve our artistic work. And then you can't figure out why more people don't use Squeak for application development. Grrrrr!!

2 3