1516 |
1516 |
1517 |items m| |
1517 |items m| |
1518 |
1518 |
1519 exclusive ifTrue:[ |
1519 exclusive ifTrue:[ |
1520 items := #( |
1520 items := #( |
1521 ('show more' showMore ) |
1521 ('Show more' showMore ) |
1522 ('show verbose backtrace' showVerboseBacktrace ) |
1522 ('Show verbose backtrace' showVerboseBacktrace ) |
1523 ('-' ) |
1523 ('-' ) |
1524 ('remove breakpoint' removeBreakpoint ) |
1524 ('Remove breakpoint' removeBreakpoint ) |
1525 ('remove all trace & breakpoints' removeAllBreakpoints ) |
1525 ('Remove all trace & breakpoints' removeAllBreakpoints ) |
1526 ('-' ) |
1526 ('-' ) |
1527 ('copy walkback text' copyWalkbackText ) |
1527 ('Copy walkback text' copyWalkbackText ) |
1528 ('-' ) |
1528 ('-' ) |
1529 ('quickTerminate' quickTerminate ) |
1529 ('QuickTerminate' quickTerminate ) |
1530 ('=' ) |
1530 ('=' ) |
1531 ('exit smalltalk (no confirmation)' exit ) |
1531 ('Exit smalltalk (no confirmation)' exit ) |
1532 ). |
1532 ). |
1533 ] ifFalse:[ |
1533 ] ifFalse:[ |
1534 items := #( |
1534 items := #( |
1535 ('show more' showMore ) |
1535 ('Show more' showMore ) |
1536 ('show verbose backtrace' showVerboseBacktrace ) |
1536 ('Show verbose backtrace' showVerboseBacktrace ) |
1537 ('-' ) |
1537 ('-' ) |
1538 ('skip' skip ) |
1538 ('Skip' skip ) |
1539 ('step out' skipForReturn ) |
1539 ('Step out' skipForReturn ) |
1540 ('skip until entering...' skipUntilEntering ) |
1540 ('Skip until entering...' skipUntilEntering ) |
1541 ('-' ) |
1541 ('-' ) |
1542 " |
1542 " |
1543 ('continue' doContinue ) |
1543 ('Continue' doContinue ) |
1544 ('terminate' doTerminate ) |
1544 ('Terminate' doTerminate ) |
1545 ('abort' doAbort ) |
1545 ('Abort' doAbort ) |
1546 ('-' ) |
1546 ('-' ) |
1547 ('step' doStep ) |
1547 ('Step' doStep ) |
1548 ('send' doSend ) |
1548 ('Send' doSend ) |
1549 ('-' ) |
1549 ('-' ) |
1550 ('return' doReturn ) |
1550 ('Return' doReturn ) |
1551 ('restart' doRestart ) |
1551 ('Restart' doRestart ) |
1552 ('-' ) |
1552 ('-' ) |
1553 " |
1553 " |
1554 ('remove breakpoint' removeBreakpoint ) |
1554 ('Remove breakpoint' removeBreakpoint ) |
1555 ('remove all trace & breakpoints' removeAllBreakpoints ) |
1555 ('Remove all trace & breakpoints' removeAllBreakpoints ) |
1556 ). |
1556 ). |
1557 |
1557 |
1558 ignoreBreakpoints == true ifTrue:[ |
1558 ignoreBreakpoints == true ifTrue:[ |
1559 items := items , #( |
1559 items := items , #( |
1560 ('allow breakpoints in doIts' doNotIgnoreBreakpoints ) |
1560 ('Allow breakpoints in doIts' doNotIgnoreBreakpoints ) |
1561 ). |
1561 ). |
1562 ] ifFalse:[ |
1562 ] ifFalse:[ |
1563 items := items , #( |
1563 items := items , #( |
1564 ('ignore breakpoints in doIts' doIgnoreBreakpoints ) |
1564 ('Ignore breakpoints in doIts' doIgnoreBreakpoints ) |
1565 ). |
1565 ). |
1566 ]. |
1566 ]. |
1567 |
1567 |
1568 items := items , #( |
1568 items := items , #( |
1569 ('-' ) |
1569 ('-' ) |
1570 ('browse (implementing class)' browse ) |
1570 ('Browse (implementing class)' browse ) |
1571 ('browse (receivers class)' browseClass ) |
1571 ('Browse (receivers class)' browseClass ) |
1572 ('browse class hierarchy' browseClassHierarchy ) |
1572 ('Browse class hierarchy' browseClassHierarchy ) |
1573 ('browse full class protocol' browseFullClassProtocol ) |
1573 ('Browse full class protocol' browseFullClassProtocol ) |
1574 ('implementors' browseImplementors ) |
1574 ('Implementors' browseImplementors ) |
1575 ('implementors of...' browseImplementorsOf ) |
1575 ('Implementors of...' browseImplementorsOf ) |
1576 ('senders' browseSenders ) |
1576 ('Senders' browseSenders ) |
1577 ('senders of...' browseSendersOf ) |
1577 ('Senders of...' browseSendersOf ) |
1578 ('-' ) |
1578 ('-' ) |
1579 ('inspect context' inspectContext ) |
1579 ('Inspect context' inspectContext ) |
1580 ('copy walkback text' copyWalkbackText ) |
1580 ('Copy walkback text' copyWalkbackText ) |
1581 ('-' ) |
1581 ('-' ) |
1582 ('quickTerminate' quickTerminate ) |
1582 ('QuickTerminate' quickTerminate ) |
1583 ('=' ) |
1583 ('=' ) |
1584 ('exit smalltalk (no confirmation)' exit ) |
1584 ('Exit smalltalk (no confirmation)' exit ) |
1585 ). |
1585 ). |
1586 ]. |
1586 ]. |
1587 |
1587 |
1588 |
1588 |
1589 m := PopUpMenu |
1589 m := PopUpMenu |