37 |
|
|
38 |
|
#define FONTNAME "9x15" /* text font we'll use */ |
39 |
|
|
40 |
< |
#define CTRL(c) ('c'-'@') |
40 |
> |
#define CTRL(c) ((c)-'@') |
41 |
|
|
42 |
|
#define BORWIDTH 5 /* border width */ |
43 |
|
#define BARHEIGHT 25 /* menu bar size */ |
90 |
|
|
91 |
|
extern char *malloc(), *calloc(); |
92 |
|
|
93 |
< |
extern double atof(), pow(), log(); |
93 |
> |
extern double pow(), log(); |
94 |
|
|
95 |
|
|
96 |
|
main(argc, argv) |
367 |
|
return(0); |
368 |
|
switch (*cp) { /* interpret command */ |
369 |
|
case 'q': |
370 |
< |
case CTRL(D): /* quit */ |
370 |
> |
case CTRL('D'): /* quit */ |
371 |
|
quit(0); |
372 |
|
case '\n': |
373 |
|
case '\r': |
437 |
|
free_raster(ourras); |
438 |
|
getras(); |
439 |
|
/* fall through */ |
440 |
< |
case CTRL(R): /* redraw */ |
441 |
< |
case CTRL(L): |
440 |
> |
case CTRL('R'): /* redraw */ |
441 |
> |
case CTRL('L'): |
442 |
|
unmap_rcolors(ourras); |
443 |
|
XClear(wind); |
444 |
|
return(redraw(0, 0, width, height)); |