File: BreakManager.m

package info (click to toggle)
clisp 1997-12-06-1
  • links: PTS
  • area: main
  • in suites: hamm, slink
  • size: 20,744 kB
  • ctags: 8,390
  • sloc: ansic: 37,808; lisp: 37,255; asm: 6,393; sh: 3,077; objc: 2,481; makefile: 1,174; sed: 96; perl: 14
file content (96 lines) | stat: -rw-r--r-- 1,249 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
#import "BreakManager.h"
#import "Coordinator.h"

@implementation BreakManager

- abort:sender
{
    [coordinator userEntered:"Abort\n"];
    return self;
}

- activate:sender
{
    [window orderFront:self];
    return self;
}

- backtrace:sender
{
    [coordinator userEntered:"Backtrace\n"];
    return self;
}

- bottom:sender
{
    [coordinator userEntered:"Bottom\n"];
    return self;
}

- continue:sender
{
    [coordinator userEntered:"Continue\n"];
    return self;
}

- down:sender
{
    [coordinator userEntered:"Down\n"];
    return self;
}

- mode1:sender
{
    [coordinator userEntered:"Mode-1\n"];
    return self;
}

- mode2:sender
{
    [coordinator userEntered:"Mode-2\n"];
    return self;
}

- mode3:sender
{
    [coordinator userEntered:"Mode-3\n"];
    return self;
}

- mode4:sender
{
    [coordinator userEntered:"Mode-4\n"];
    return self;
}

- next:sender
{
    [coordinator userEntered:"Next\n"];
    return self;
}

- over:sender
{
    [coordinator userEntered:"Over\n"];
    return self;
}

- step:sender
{
    [coordinator userEntered:"Step\n"];
    return self;
}

- top:sender
{
    [coordinator userEntered:"Top\n"];
    return self;
}

- up:sender
{
    [coordinator userEntered:"Up\n"];
    return self;
}

@end