Hi, Here is a patch for VisualGst that removes all the exceptions handling code from the context list.
Cheers, Gwen
>From c2de160de785b433a595c350d9035e422ce431b1 Mon Sep 17 00:00:00 2001 From: Gwenael Casaccio <[email protected]> Date: Mon, 27 May 2013 15:34:41 +0200 Subject: [PATCH] Do not display useless information in the debugger --- packages/visualgst/Debugger/Extensions.st | 44 ++++++++++++++++++++++ packages/visualgst/Debugger/GtkContextWidget.st | 35 +++++++++++++++++ packages/visualgst/Debugger/GtkDebugger.st | 41 ++++++++++++++++++++ packages/visualgst/Debugger/GtkStackInspector.st | 35 +++++++++++++++++ .../visualgst/Debugger/GtkStackInspectorView.st | 35 +++++++++++++++++ packages/visualgst/Extensions.st | 10 ----- packages/visualgst/package.xml | 2 + 7 files changed, 192 insertions(+), 10 deletions(-) create mode 100644 packages/visualgst/Debugger/Extensions.st diff --git a/packages/visualgst/Debugger/Extensions.st b/packages/visualgst/Debugger/Extensions.st new file mode 100644 index 0000000..8e73074 --- /dev/null +++ b/packages/visualgst/Debugger/Extensions.st @@ -0,0 +1,44 @@ +"====================================================================== +| +| GtkDebugger extensions +| + ======================================================================" + +"====================================================================== +| +| Copyright (c) 2013 +| Gwenael Casaccio <[email protected]>, +| +| +| This file is part of VisualGST. +| +| Permission is hereby granted, free of charge, to any person obtaining +| a copy of this software and associated documentation files (the +| 'Software'), to deal in the Software without restriction, including +| without limitation the rights to use, copy, modify, merge, publish, +| distribute, sublicense, and/or sell copies of the Software, and to +| permit persons to whom the Software is furnished to do so, subject to +| the following conditions: +| +| The above copyright notice and this permission notice shall be +| included in all copies or substantial portions of the Software. +| +| THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, +| EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF +| MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. +| IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY +| CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, +| TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE +| SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. +| + ======================================================================" + +Behavior extend [ + + debuggerClass [ + <category: '*VisualGST-debugger'> + + ^ VisualGST.GtkDebugger + ] +] + diff --git a/packages/visualgst/Debugger/GtkContextWidget.st b/packages/visualgst/Debugger/GtkContextWidget.st index db47adb..0f80417 100644 --- a/packages/visualgst/Debugger/GtkContextWidget.st +++ b/packages/visualgst/Debugger/GtkContextWidget.st @@ -1,3 +1,38 @@ +"====================================================================== +| +| GtkContextWidget class definition +| + ======================================================================" + +"====================================================================== +| +| Copyright (c) 2013 +| Gwenael Casaccio <[email protected]>, +| +| +| This file is part of VisualGST. +| +| Permission is hereby granted, free of charge, to any person obtaining +| a copy of this software and associated documentation files (the +| 'Software'), to deal in the Software without restriction, including +| without limitation the rights to use, copy, modify, merge, publish, +| distribute, sublicense, and/or sell copies of the Software, and to +| permit persons to whom the Software is furnished to do so, subject to +| the following conditions: +| +| The above copyright notice and this permission notice shall be +| included in all copies or substantial portions of the Software. +| +| THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, +| EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF +| MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. +| IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY +| CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, +| TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE +| SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. +| + ======================================================================" + GtkConcreteWidget subclass: GtkContextWidget [ | column contextTree model context contextList | diff --git a/packages/visualgst/Debugger/GtkDebugger.st b/packages/visualgst/Debugger/GtkDebugger.st index 8f82740..1998940 100644 --- a/packages/visualgst/Debugger/GtkDebugger.st +++ b/packages/visualgst/Debugger/GtkDebugger.st @@ -1,3 +1,38 @@ +"====================================================================== +| +| GtkDebugger class definition +| + ======================================================================" + +"====================================================================== +| +| Copyright (c) 2013 +| Gwenael Casaccio <[email protected]>, +| +| +| This file is part of VisualGST. +| +| Permission is hereby granted, free of charge, to any person obtaining +| a copy of this software and associated documentation files (the +| 'Software'), to deal in the Software without restriction, including +| without limitation the rights to use, copy, modify, merge, publish, +| distribute, sublicense, and/or sell copies of the Software, and to +| permit persons to whom the Software is furnished to do so, subject to +| the following conditions: +| +| The above copyright notice and this permission notice shall be +| included in all copies or substantial portions of the Software. +| +| THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, +| EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF +| MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. +| IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY +| CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, +| TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE +| SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. +| + ======================================================================" + GtkBrowsingTool subclass: GtkDebugger [ | codeWidget contextWidget debugger inspectorWidget stackInspectorWidget | @@ -46,6 +81,7 @@ GtkBrowsingTool subclass: GtkDebugger [ postInitialize [ <category: 'initialization'> + super postInitialize. codeWidget postInitialize. inspectorWidget postInitialize. @@ -134,6 +170,11 @@ GtkBrowsingTool subclass: GtkDebugger [ <category: 'context'> debugger := aDebugger. + + "Show meaningful source code to the user." + [ debugger suspendedContext isInternalExceptionHandlingContext ] + whileTrue: [ debugger slowFinish ]. + self updateContextWidget ] diff --git a/packages/visualgst/Debugger/GtkStackInspector.st b/packages/visualgst/Debugger/GtkStackInspector.st index dcc1811..a94c3a1 100644 --- a/packages/visualgst/Debugger/GtkStackInspector.st +++ b/packages/visualgst/Debugger/GtkStackInspector.st @@ -1,3 +1,38 @@ +"====================================================================== +| +| GtkStackInspector class definition +| + ======================================================================" + +"====================================================================== +| +| Copyright (c) 2013 +| Gwenael Casaccio <[email protected]>, +| +| +| This file is part of VisualGST. +| +| Permission is hereby granted, free of charge, to any person obtaining +| a copy of this software and associated documentation files (the +| 'Software'), to deal in the Software without restriction, including +| without limitation the rights to use, copy, modify, merge, publish, +| distribute, sublicense, and/or sell copies of the Software, and to +| permit persons to whom the Software is furnished to do so, subject to +| the following conditions: +| +| The above copyright notice and this permission notice shall be +| included in all copies or substantial portions of the Software. +| +| THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, +| EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF +| MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. +| IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY +| CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, +| TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE +| SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. +| + ======================================================================" + GtkInspectorWidget subclass: GtkStackInspector [ object: aContext [ diff --git a/packages/visualgst/Debugger/GtkStackInspectorView.st b/packages/visualgst/Debugger/GtkStackInspectorView.st index dfb3436..f814ca8 100644 --- a/packages/visualgst/Debugger/GtkStackInspectorView.st +++ b/packages/visualgst/Debugger/GtkStackInspectorView.st @@ -1,3 +1,38 @@ +"====================================================================== +| +| GtkStackInspectorView class definition +| + ======================================================================" + +"====================================================================== +| +| Copyright (c) 2013 +| Gwenael Casaccio <[email protected]>, +| +| +| This file is part of VisualGST. +| +| Permission is hereby granted, free of charge, to any person obtaining +| a copy of this software and associated documentation files (the +| 'Software'), to deal in the Software without restriction, including +| without limitation the rights to use, copy, modify, merge, publish, +| distribute, sublicense, and/or sell copies of the Software, and to +| permit persons to whom the Software is furnished to do so, subject to +| the following conditions: +| +| The above copyright notice and this permission notice shall be +| included in all copies or substantial portions of the Software. +| +| THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, +| EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF +| MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. +| IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY +| CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, +| TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE +| SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. +| + ======================================================================" + GtkConcreteWidget subclass: GtkStackInspectorView [ | object variables | diff --git a/packages/visualgst/Extensions.st b/packages/visualgst/Extensions.st index 3608605..92e98c0 100644 --- a/packages/visualgst/Extensions.st +++ b/packages/visualgst/Extensions.st @@ -383,16 +383,6 @@ Debugger extend [ ] ] -Behavior extend [ - - debuggerClass [ - <category: '*VisualGST'> - - "^ nil" - ^ VisualGST.GtkDebugger - ] -] - VariableBinding extend [ hasLiterals [ diff --git a/packages/visualgst/package.xml b/packages/visualgst/package.xml index 4267d1d..e5c54e2 100644 --- a/packages/visualgst/package.xml +++ b/packages/visualgst/package.xml @@ -186,6 +186,7 @@ <filein>GtkNotebookWidget.st</filein> <filein>Image/GtkImageModel.st</filein> <filein>Image/GtkImageWidget.st</filein> + <filein>Debugger/Extensions.st</filein> <filein>Debugger/GtkContextWidget.st</filein> <filein>Debugger/GtkDebugger.st</filein> <filein>State/BrowserState.st</filein> @@ -412,6 +413,7 @@ <file>GtkNotebookWidget.st</file> <file>Image/GtkImageModel.st</file> <file>Image/GtkImageWidget.st</file> + <file>Debugger/Extensions.st</file> <file>Debugger/GtkContextWidget.st</file> <file>Debugger/GtkDebugger.st</file> <file>State/BrowserState.st</file> -- 1.8.1.2
_______________________________________________ help-smalltalk mailing list [email protected] https://lists.gnu.org/mailman/listinfo/help-smalltalk
