[squeak-dev] The Trunk: Tools-ct.1081.mcz
Marcel Taeumel
marcel.taeumel at hpi.de
Tue Dec 7 10:18:29 UTC 2021
Thanks! :-)
Am 06.12.2021 19:57:17 schrieb Thiede, Christoph <christoph.thiede at student.hpi.uni-potsdam.de>:
PS: The future work ideas from this thread still apply: http://lists.squeakfoundation.org/pipermail/squeak-dev/2020-March/208018.html [http://lists.squeakfoundation.org/pipermail/squeak-dev/2020-March/208018.html] :-)
Best,
Christoph
Von: Squeak-dev <squeak-dev-bounces at lists.squeakfoundation.org> im Auftrag von commits at source.squeak.org <commits at source.squeak.org>
Gesendet: Montag, 6. Dezember 2021 19:54:56
An: squeak-dev at lists.squeakfoundation.org; packages at lists.squeakfoundation.org
Betreff: [squeak-dev] The Trunk: Tools-ct.1081.mcz
Christoph Thiede uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-ct.1081.mcz [http://source.squeak.org/trunk/Tools-ct.1081.mcz]
==================== Summary ====================
Name: Tools-ct.1081
Author: ct
Time: 6 December 2021, 7:54:51.658405 pm
UUID: d64478c1-8f6f-1f49-b6ad-21783eadeffe
Ancestors: Tools-mt.1080, Tools-ct.960
Merges Tools-ct.960:
Revise message list menus and make "toggle break on entry" an actual toggle item. Improves multilingual support.
=============== Diff against Tools-mt.1080 ===============
Item was changed:
----- Method: Browser>>mainMessageListMenu: (in category 'message functions') -----
mainMessageListMenu: aMenu
<messageListMenuShifted: false>
+
+ ^ aMenu
+ addTranslatedList: #(
+ ('what to show...' offerWhatToShowMenu));
+ add: (self isBreakOnEntry ifTrue: ['<on>'] ifFalse: ['<off>']) , 'break on entry' translated
+ action: #toggleBreakOnEntry;
+ addTranslatedList: #(
- ^ aMenu addList: #(
- ('what to show...' offerWhatToShowMenu)
- ('toggle break on entry' toggleBreakOnEntry)
-
('browse full (b)' browseMethodFull)
('browse hierarchy (h)' browseClassHierarchy)
('browse protocol (p)' browseFullProtocol)
-
('fileOut' fileOutMessage)
('printOut' printOutMessage)
('copy selector (c)' copySelector)
('copy reference (C)' copyReference)
-
('senders of... (n)' browseSendersOfMessages)
('implementors of... (m)' browseMessages)
('inheritance (i)' methodHierarchy)
('versions (v)' browseVersions)
-
('references... (r)' browseVariableReferences)
('assignments... (a)' browseVariableAssignments)
('class refs (N)' browseClassRefs)
-
('remove method (x)' removeMessage)
('explore method' exploreMethod)
('inspect method' inspectMethod));
+ yourself!
- yourself
- !
Item was added:
+ ----- Method: CodeHolder>>isBreakOnEntry (in category 'breakpoints') -----
+ isBreakOnEntry
+
+ | selectedMethod |
+ selectedMethod := self selectedClassOrMetaClass
+ compiledMethodAt: self selectedMessageName
+ ifAbsent: [^ false].
+ ^ selectedMethod hasBreakpoint!
Item was changed:
----- Method: Debugger>>mainContextStackMenu: (in category 'context stack menu') -----
mainContextStackMenu: aMenu
"Set up the menu appropriately for the context-stack-list, unshifted"
<contextStackMenuShifted: false>
+ ^ aMenu
+ addTranslatedList: #(
- ^ aMenu addList: #(
('fullStack (f)' fullStack)
('restart (r)' restart)
('proceed (p)' proceed)
('step (t)' doStep)
('step through (T)' stepIntoBlock)
('send (e)' send)
('where (w)' where)
('peel to first like this' peelToFirst)
-
('return entered value' returnValue)
+ - );
+ add: (self isBreakOnEntry ifTrue: ['<on>'] ifFalse: ['<off>']) , 'break on entry' translated
+ action: #toggleBreakOnEntry;
+ addTranslatedList: #(
- -
- ('toggle break on entry' toggleBreakOnEntry)
('senders of (n)' browseSendersOfMessages)
('implementors of (m)' browseMessages)
('inheritance (i)' methodHierarchy)
- -
('versions (v)' browseVersions)
-
('references (r)' browseVariableReferences)
('assignments (a)' browseVariableAssignments)
-
('class refs (N)' browseClassRefs)
('browse full (b)' browseMethodFull)
('file out ' fileOutMessage)
('remove method (x) ' removeMessage)
-
('copy bug report to clipboard' copyBugReportToClipboard));
+ yourself!
- yourself
- !
Item was changed:
----- Method: MessageSet>>mainMessageListMenu: (in category 'message list') -----
mainMessageListMenu: aMenu
- "Answer the message-list menu"
<messageListMenuShifted: false>
+
+ ^ aMenu
+ addTranslatedList: #(
+ ('what to show...' offerWhatToShowMenu));
+ add: (self isBreakOnEntry ifTrue: ['<on>'] ifFalse: ['<off>']) , 'break on entry' translated
+ action: #toggleBreakOnEntry;
+ addTranslatedList: #(
- aMenu addList: #(
- ('what to show...' offerWhatToShowMenu)
- ('toggle break on entry' toggleBreakOnEntry)
-
('browse full (b)' browseMethodFull)
('browse hierarchy (h)' browseClassHierarchy)
('browse protocol (p)' browseFullProtocol)
-
('fileOut' fileOutMessage)
('printOut' printOutMessage)
('copy selector (c)' copySelector)
('copy reference (C)' copyReference)
-
('senders of... (n)' browseSendersOfMessages)
('implementors of... (m)' browseMessages)
('inheritance (i)' methodHierarchy)
('versions (v)' browseVersions)
-
('references... (r)' browseVariableReferences)
('assignments... (a)' browseVariableAssignments)
('class refs (N)' browseClassRefs)
-
('remove method (x)' removeMessage)
('explore method' exploreMethod)
+ ('inspect method' inspectMethod));
+ yourself!
- ('inspect method' inspectMethod)).
- ^ aMenu!
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20211207/8514577f/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pastedImage.png
Type: image/png
Size: 56309 bytes
Desc: not available
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20211207/8514577f/attachment-0001.png>
More information about the Squeak-dev
mailing list
|