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
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
|
#include "variables.h"
#include "calculator.h"
#include "string_manip.h"
#include "VariableList.h"
#include "number.h"
#ifdef MEMWATCH
#include "memwatch.h"
#endif
@implementation VariableList
// needs to be REALLY fast
- (int)numberOfRowsInTableView:(NSTableView *)aTableView
{
return numvars();
}
// needs to be fast
- (id)tableView:(NSTableView *)aTableView objectValueForTableColumn:(NSTableColumn*)col row:(int)rowIndex
{
struct variable *keyval;
static struct variable *keyval_cache = NULL;
static int rowIndex_cache = -1;
if (rowIndex == rowIndex_cache) {
rowIndex_cache = -1;
keyval = keyval_cache;
} else {
rowIndex_cache = rowIndex;
keyval = keyval_cache = getrealnvar(rowIndex);
}
if (! keyval)
return @"BAD ROW (VariableList)";
if ([[col identifier] isEqualToString:@"value"]) {
if (keyval->exp)
return [NSString stringWithUTF8String:keyval->expression];
else
return [NSString stringWithUTF8String:print_this_result(keyval->value)];
} else if ([[col identifier] isEqualToString:@"variable"]) {
return [NSString stringWithUTF8String:(keyval->key)];
} else {
return @"BAD COLUMN";
}
}
- (void)tableView:(NSTableView*)aTableView setObjectValue:(id)anObject forTableColumn:(NSTableColumn*)col row:(int)rowIndex
{
struct variable *theval = getrealnvar(rowIndex);
NSString *ch = [col identifier];
// printf("Column %s, Row %i was %s,%s becomes %s\n", [ch UTF8String], rowIndex, theval->key, theval->value, [anObject UTF8String]);
if ([ch isEqualToString:@"value"]) {
char * input=strdup([anObject UTF8String]);
if (justnumbers(input)) {
Number la;
num_init_set(la, last_answer);
parseme(input);
num_set(theval->value, last_answer);
theval->exp = 0;
num_set(last_answer, la);
num_free(la);
} else {
theval->expression = input;
theval->exp = 1;
}
} else if ([ch isEqualToString:@"variable"]) {
free(theval->key);
theval->key = strdup([anObject UTF8String]);
strstrip(' ',theval->key);
}
}
- (IBAction)newVariable:(id)sender
{
char varname[20];
int i=1;
Number blank;
num_init_set_ui(blank,0);
sprintf(varname,"NewVariable%i",i);
while(varexists(varname)) {
++i;
sprintf(varname,"NewVariable%i",i);
}
putval(varname,blank,NULL);
[theList reloadData];
}
- (IBAction)delVariable:(id)sender
{
if ([theList selectedRow] > -1) {
delnvar([theList selectedRow]);
[theList reloadData];
}
}
- (IBAction)clearVariables:(id)sender
{
int i, total=numvars();
for (i=0; i<total; ++i) {
delnvar(0);
}
[theList reloadData];
}
- (IBAction)copyMe:(id)sender
{
NSPasteboard* pboard=[NSPasteboard generalPasteboard];
NSString *theString = @"";
NSIndexSet* rowEnumerator=[theList selectedRowIndexes];
unsigned int theIndex=0;
// Set the pasteboard types you want here.
[pboard declareTypes:[NSArray arrayWithObject:NSStringPboardType] owner:self];
theIndex = [rowEnumerator firstIndex];
do {
struct variable *keyval = getrealnvar(theIndex);
if (keyval == NULL) {
theString = [theString stringByAppendingString:@"BAD ROW\n"];
} else {
theString = [theString stringByAppendingFormat:@"%s\t%s\n", keyval->key, keyval->exp?keyval->expression:print_this_result(keyval->value)];
}
} while ((theIndex = [rowEnumerator indexGreaterThanIndex:theIndex]) != NSNotFound);
[pboard setString:theString forType:NSStringPboardType];
}
// ** Make sure we don't enable the copy menu item unless there is something to copy.
- (BOOL)validateMenuItem:(id <NSMenuItem>)menuItem
{
if ([menuItem tag]==666)
{
return ([theList numberOfSelectedRows]>0);
}
return YES;
}
@end
|
