Should any of these be added?

methods := CompiledMethod allInstances select: [ :each | each pragmas size >0 ]. pragmas := methods flatCollectAsSet: [ :each | each pragmas collect: [ :pragma | pragma keyword ] ].
allPragmaProtocols := Dictionary new.
pragmas do: [ :pragma |
        allPragmaProtocols at: pragma put:
(Bag withAll:(methods select: [ :each | each hasPragmaNamed: pragma ] thenCollect: [ :each | each protocol ]) ) sortedCounts
         ].
String streamContents: [ :s |
        allPragmaProtocols associationsDo:  [ :pragma |
                s nextPutAll: pragma key; cr.
pragma value do: [ :entry | s tab; nextPutAll: (entry key asString); tab; nextPutAll: (entry value) asString;cr ]]]

example
        73      examples
directoryService
        1       *System-FileRegistry
gtInspectorAction
        2       *GT-InspectorExtensions-Core
        1       *GT-Inspector
        1       ui
        1       *GT-SpotterExtensions-Core
RubEditingModeMenu
        3       menu
systemsettings
        60      settings
        3       setting
        2       configuration
        1       morphic
        1       fonts
RubLineNumberMenu
        1       menu declaration
systemHelp
        1       conversion
        1       converting
gtInspectorTag:
        2       *GT-Inspector
nautilusGlobalMethodMenu
        3       menu
        1       *GT-Inspector-Examples-UI
debuggingStone:label:
        2       testing
        1       accessing
        1       transmitting
instVarCommand
        4       inst-var
iconThemeSelector:
        1       examples
nautilusGlobalGroupMenu
        2       menu
todo:
        1       accessing
        1       *GT-SpotterExtensions-Core
nautilusGlobalSourceCodeMenu
        2       menu
sepc:
        1       specs
fileListContentMenu
        1       menu
textEditorMenu
        1       menu declaration
tempVarCommand
        1       temp-var
primitive:module:error:
        47      private
        31      accessing
        13      rendering
        12      *generated-code-non-existing-package
        10      win heap api
        8       window management
        8       struct primitives
        8       transformations
        6       common
        6       opengl
        5       initialize
        4       integer primitives
        4       video
        4       enum primitives
        3       mouse
        3       instance creation
        3       bootstrapping
        3       primitives
        3       surface
        2       timer
        2       finalization
        2       stdio
        2       finalizing
        2       joystick
        2       cursor
        2       double type
        2       clipboard
        2       pixels handling
        2       hint options
        2       as yet unclassified
        2       examples-pragmas
        2       accessing functions
        1       destroy
        1       using the cursor
        1       closing
        1       modules
        1       event
        1       antialiasing
        1       deleting
        1       error handing
        1       subpixel order
        1       freeing resources
        1       examples - pragmas
        1       cairo
        1       basic-external-function
        1       *NativeBoost-Examples
        1       not finished yet
        1       path primitives
        1       system
        1       misc
        1       *NativeBoost-Core
nautilusGlobalPackageFixMenu
        1       menu
baseline
        10      baseline pragma - github reference
        3       baseline pragma - external
        1       ConfigurationOfFoo
        1       baseline
        1       api projectSpec
        1       issue 32
brickBuilderProperty:name:as:getter:model:
        20      brick-geometry-properties
        14      brick-properties
        8       brick-layout-properties
        4       brick-geometry
        2       brick-layout
smalltalkEditorShiftedMenu
        1       menu declaration
contextMenu:
        1       *Versionner-Commit-UI
RubPlainTextMenu
        1       menu
toBeDeprecated:
        1       *GT-Inspector-Examples-DEPRECATED
        1       *GT-Inspector-Examples-Core
processBrowserProcessListMenu
        1       menu
keymap
        38      shortcuts
        7       keymapping
        7       builder
        6       shortcut-old
        1       keymap
        1       instance creation
        1       keybindings
        1       settings
        1       *Keymapping-Core
worldMenuExample
        5       menu declaring
sourceCodeCommand
        3       source
assignmentCommand
        1       methods
        1       assignment
fileService
        3       *System-FileRegistry
        2       System-FileRegistry
        1       *System-Changes-FileServices
        1       *MonticelloFileServices
        1       file service
        1       *FuelSystem-FileRegistry
        1       *Graphics-Files-FileRegistry
        1       *Tool-FileList
RubTabWidthMenu
        1       menus
contextMenuDebuggingAction
        11      registration
        1       actions creation
command
        25      commands
        1       as yet unclassified
        1       *NautilusGroupAutoBuilder
systemEventRegistration
        2       system-events
        1       system integration
        1       event registration
raises:
        5       examples
        3       examples 1
        1       examples 3
        1       examples 2
iconBase64:
        1       examples
inline:
        2       filing
        1       smoothing
subject:
        2       examples
specDebuggerCodeContextMenu
        1       menu code
spotterOrder:
        99      *GT-SpotterExtensions-Core
        7       ui
        5       mocks
        4       *qualityAssistant
        3       *GT-Inspector-Examples-UI
        1       as yet unclassified
        1       *Tool-Catalog
classCommand
        2       class
metaLinkOptions:
        1       examples
primitive:module:
        160     primitives
        67      private
        46      memory access +
        41      accessing
        24      *NativeBoost-Core
        23      private-primitives
        17      primitives-access
        16      system primitives
        13      testing
        12      basic-interpreter-proxy-interaction
        11      file primitives
        11      primitives-incremental
        11      primitives-adding
        9       primitives-plugin
        8       array arithmetic primitives
        8       path primitives
        8       font creation
        7       nativeboost-primitives
        7       as yet unclassified
        7       primitives-ipv6
        7       api calls
        6       api
        6       comparing
        5       bit manipulation
        5       operations
        4       native
        4       bootstrapping
        4       basc-types
        4       retrieving symbols
        4       library loading
        3       converting
        3       util
        3       accessing functions
        3       error reporting
        3       opening
        2       memory operations
        2       transforming rects
        2       error handling
        2       filing
        2       drawing
        2       debugging
        2       host window access
        2       iterating
        2       dnd requests
        2       primitives-misc
        2       *NativeBoost-Examples
        2       copying
        2       errors
        2       transforming points
        2       tests
        2       C heap access
        2       misc
        2       qsort callouts
        2       colorspace conversion
        1       code emitting
        1       events-processing
        1       string access
        1       *NativeBoost-core
        1       image reading/writing
        1       arithmetic
        1       modules
        1       private-buffers
        1       huffman encoding
        1       memory access
        1       keyboard
        1       instance creation
        1       writing
        1       validation
        1       unregistering
        1       helper
        1       composing
        1       custom type
        1       line drawing
        1       inflating
        1       byte based hash
        1       platform id
        1       tests - language-side callback
        1       network initialization
        1       initialize-release
        1       basic-float-operations
        1       *FreeType-Addition
        1       dct
        1       deflating
        1       special
        1       registering
        1       double type
        1       reading
depends:
        20      examples
        9       examples-failing
        7       examples 7
        5       examples - filtering
        5       examples 3
        4       examples 4
        3       *GT-InspectorExtensions-Core
        3       examples 1
        3       examples 2
        3       examples 6
        2       examples 5
        1       examples - basic
nautilusGlobalProtocolMenu
        1       menu
classVarCommand
        3       class-var
preDebuggingAction
        4       registration
        1       actions creation
lint:rationale:author:
        1       rendering
changeSorterClassListMenu
        1       menu
dualChangeSorterMessageListMenu
        1       menu
version:
        128     baselines
        53      versions
        24      ConfigurationOfProjectToolBox
        9       issue 63
        8       ConfigurationOfFoo
        7       Issue 154
        7       ConfigurationOfAtomicFoo
        7       external configurations
        5       Issue 115
        5       ConfigurationOfFan
        4       ConfigurationOfSymbolic
        4       baseline:with:
        4       Issue 77
        4       Issue 119
        4       ConfigurationOfProjectFie
        3       issue 32
        3       Issue 95
        3       invalid configurations
        3       Issue 86
        2       ConfigurationOfUmbrella
        2       issue 84
        2       ConfigurationOfFix
        2       baseline pragma - github reference
        2       ConfigurationOfAtomicFan
        2       locking
        2       Issue 171
        2       command tests
        2       snapshot versions
        1       ConfigurationOfFeaux
        1       ConfigurationOfProjectFee
        1       ConfigurationOfProjectFum
        1       baseline 1.0
        1       Issue 125
        1       Issue 136
        1       ConfigurationOfProjectFoe
        1       ConfigurationOfFum
        1       ConfigurationOfMBFooTest
apiDocumentation
        57      loading
        46      development support
        23      scripts
        7       utility
        6       validation
        2       *Versionner-Commit
        2       load validation
        1       unloading Metacello
        1       deprecated
        1       *Versionner-Core-DependenciesModel
        1       accessing
processBrowserStackListMenu
        1       menu
wikiStyleHelp:
        2       help
        1       help-text
        1       help system
iconBytes:
        1       examples
contextMenu
        29      menu
        5       menu declaration
        3       *GT-Inspector-Examples-UI
        1       menu code
        1       opening
        1       nautilus
        1       menus
        1       *NautilusGroupAutoBuilder
settingPragmaProcessor
        1       pragmas
nautilusGlobalClassFixMenu
        1       menu
script
        2       instance creation
        2       opening
        1       showing
        1       user interface
        1       cleanup
        1       run
        1       utilities
        1       actions
gtExample
        122     *GT-InspectorExtensions-Core
        93      examples
        42      *GT-SpotterExtensions-Core
        9       examples-failing
        8       examples 3
        7       examples 7
        6       examples 1
        5       examples - filtering
        4       examples 2
        4       examples 4
        3       examples 6
        3       examples - basic
        2       examples 5
        1       instance creation
        1       example
styleTable:
        5       style table
worldMenu
        9       world menu
        7       menu
        4       world menu items
        2       system menu
        2       *Morphic-Base
        1       *Tool-Transcript
        1       tool registration
        1       ui
        1       zen
contextMenuCodeDebuggingAction
        1       registration
textEditorShiftedMenu
        1       menu declaration
playgroundContextMenu
        1       menu
spotterPreview:
        19      *GT-SpotterExtensions-Core
        2       ui
        2       *qualityAssistant
        1       *GT-Spotter
exampleWidget
        5       examples
        4       example
menu
        4       menu
        1       building
        1       *NautilusGroupAutoBuilder
reflective:
        6       message performing
        1       priv handling
changeSorterChangeSetList2Menu
        1       menu
publicTest
        7       tests
script:
        3       protocol
        3       pages
blockCommand
        2       source
smalltalkEditorMenu
        1       menu declaration
changeSorterMessageListMenu
        1       menu
changeSorterChangeSetList1Menu
        1       menu
messageCommand
        3       messages
        2       source
        1       methods
defaultSymbolicVersion:
        1       defaults
gtInspectorPresentationOrder:
        114     *GT-InspectorExtensions-Core
        16      *OpalTools
        8       ui
        6       *qualityAssistant
        4       inspecting
        4       inspector extensions
        3       *GT-Inspector-Examples-UI
        2       gt-inspector-extension
        2       *GT-Inspector
        1       printing
RubSmalltalkCommentMenu
        1       menu
iconClass:selector:
        1       examples
symbolicVersion:
        41      symbolic versions
        5       versions
        3       ConfigurationOfMBFooTest
        2       tags
        2       symbolic
        2       command tests
        2       ConfigurationOfSymbolic
        1       ConfigurationOfFoo
        1       accessing
        1       external configurations
        1       ConfigurationOfProjectToolBox
debuggingAction
        9       registration
        1       as yet unclassified
TimeProfilerFullReportMenu
        1       opening
spotterEventRecorderSerializedData
        2       serialized data
windowMenu
        1       menu items
compilerOptions:
        2       examples-blocks-optimized
        2       examples - loops
primitive
        5       primitives
label:
        79      *GT-InspectorExtensions-Core
        78      examples
        37      *GT-SpotterExtensions-Core
        9       examples-failing
        8       examples 3
        7       examples 7
        6       examples 1
        5       examples - filtering
        4       examples 4
        4       examples 2
        3       examples - basic
        3       examples 6
        2       examples 5
ignoreForCoverage
        1       documentation
        1       sunitgui
glmBrowser:input:
        14      others
        10      browsers
        9       actions examples
        7       explicit selection
        5       text
        4       table
        3       composite
        2       updating
        2       tabs examples
        2       searching and filtering
        1       actionlist
dependsClass:selector:
        3       examples
version:imports:
        464     versions
        14      ConfigurationOfProjectToolBox
        9       Issue 119
        3       baselines
        3       ConfigurationOfMBFooTest
        2       Issue 171
        2       Issue 136
        2       Issue 125
        2       Issue 115
        1       Issue 154
        1       ConfigurationOfAtomicFoo
nautilusGlobalGroupFixMenu
        1       menu
icon:
        2       examples
literalCommand
        2       source
shortcut
        8       keymaps
        2       shortcuts
gtDebuggerPresentationOrder:
        2       ui
dualChangeSorterClassListMenu
        1       menu
expectedFailure
        2       tests
        2       private
        1       testing
mocksystemsettings
        3       settings
debuggerCompleteToSender
        14      halting
iconSelector:
        1       examples
nautilusGlobalClassMenu
        7       menu
        1       *GT-Inspector-Examples-UI
nautilusGlobalPackageTreeFixMenu
        1       menu
methodCommand
        10      methods
        1       messages
        1       source
specDebuggerStackMenuNew
        1       menu
nautilusGlobalPackageMenu
        4       monticello menus
        2       menu
        1       nautilus
        1       *GT-Inspector-Examples-UI
        1       instance creation
newVersionBrowserListMenu
        1       menu
RubSmalltalkCodeMenu
        1       accessing
        1       menu
timeout:
        1       tests - mathematical functions
spec
        42      specs
        10      spec
        1       layouts
        1       as yet unclassified
dualChangeSorteChangesListMenu
        1       menu
spec:
        47      specs
        3       spec
        1       as yet unclassified
        1       accessing
messageBrowserListMenu
        2       *MessageBrowserRefactoringAddition
        1       menu
description:
        39      examples
        5       examples - filtering
        4       examples 3
        3       examples 1
        1       examples-failing
        1       examples 2
pragma:
        2       tests - comparing
primitive:error:
        3       adding/removing methods
        2       misc
        2       examples-pragmas
        2       private
        1       nil
        1       apply primitives
var:declareC:
        5       primitives
        4       filing
        1       byte based hash
        1       comparing
subjectsAll:
        1       examples
noTest
        9       examples-failing
        7       examples 3
        7       examples 7
        4       examples
        4       examples 4
        3       examples 2
        3       examples 6
        3       examples 1
        2       examples 5
primitive:
        59      accessing
        25      private
        19      arithmetic
        17      comparing
        15      primitives
        11      memory space
        8       evaluating
        7       instance creation
        6       mathematical functions
        6       other
        6       message performing
        5       system primitives
        5       converting
        5       *Tool-Profilers
        5       gc
        4       modules
        4       bit manipulation
        4       scheduling
        3       truncation and round off
        3       reflective operations
        3       accessing instances and variables
        3       exceptions
        3       parameters
        3       introspection
        3       private-exceptions
        3       snapshot and quit
        3       copying
        2       memory scanning
        2       private events
        2       *Fuel-Collections
        2       controlling
        2       snapshots
        2       image, changes name
        2       communication
        2       deferring
        2       examples-pragmas
        2       literals
        2       changing process state
        2       scanning
        2       opening
        1       special objects
        1       testing
        1       *reflectivity
        1       examples
        1       miscellaneous
        1       display box access
        1       mirror primitives
        1       external
        1       path primitives
        1       background process
        1       read, write, position
        1       cleaning
        1       process state change
        1       class membership
        1       attributes
        1       image
        1       executing



Reply via email to