old-cross-binutils/gdb/macgdb.r
Stan Shebs 58c0b523fe Wed Jun 15 17:36:07 1994 Stan Shebs (shebs@andros.cygnus.com)
* mpw-make.in (.c.o, .gc.o): Prefix segment names with gdb_.
	(top.c.o, annotate.c.o): Add build rules.
	* macgdb.r (SysTypes.r): Include.
	('vers'): New resource, version info.
	(mFile, mEdit, mDebug): Enable all menu items.
	(mDebug): Add key equivalents for continue, step, next.
	(wConsole): Add zoom and close boxes to window.
	* mac-xdep.c (new_console_window): New function, code taken from
	mac_init.
	(mac_command_loop): Use GetCaretTime for wait interval, call
	do_idle on null events.
	(do_idle): New function.
	(zoom_window): Implement zooming.
	(v_scroll_proc): New function, handles vertical scrolling.
	(activate_window): Do activation of console window.
	(do_menu_command): Implement items of file, edit, and debug menus.
	(do_keyboard_command): Fix command extraction.
	(adjust_console_sizes, adjust_console_text): New functions.
	(hacked_fprintf, hacked_vfprintf, hacked_fputs, hacked_fputc,
	hacked_putc): Don't call draw_console.
	* ser-mac.c (mac_open): Add an error message for invalid ports.
	(first_mac_write): New global.
	(mac_write): Use first_mac_write to sleep on first several writes.
1994-06-16 01:03:01 +00:00

161 lines
2.6 KiB
R

/* Resource file for MacGDB. */
#include "SysTypes.r"
#include "Types.r"
#include "mac-defs.h"
resource 'vers' (1) {
0x02, 0x00, release, 0x00,
verUS,
"4.12.3",
"4.12.3, Copyright \251 1994 Free Software Foundation, Inc."
};
resource 'MBAR' (128) {
{ mApple, mFile, mEdit, mDebug };
};
resource 'MENU' (mApple, preload) {
mApple,
textMenuProc,
0x7FFFFFFD,
enabled,
apple,
{
"About...", noIcon, noKey, noMark, plain,
"-", noIcon, noKey, noMark, plain
}
};
resource 'MENU' (mFile, preload) {
mFile,
textMenuProc,
allEnabled,
enabled,
"File",
{
"New", noIcon, noKey, noMark, plain,
"Open...", noIcon, "O", noMark, plain,
"-", noIcon, noKey, noMark, plain,
"Quit", noIcon, "Q", noMark, plain
}
};
resource 'MENU' (mEdit, preload) {
mEdit,
textMenuProc,
allEnabled,
enabled,
"Edit",
{
"Undo", noIcon, "Z", noMark, plain,
"-", noIcon, noKey, noMark, plain,
"Cut", noIcon, "X", noMark, plain,
"Copy", noIcon, "C", noMark, plain,
"Paste", noIcon, "V", noMark, plain,
"Clear", noIcon, noKey, noMark, plain
}
};
resource 'MENU' (mDebug, preload) {
mDebug,
textMenuProc,
allEnabled,
enabled,
"Debug",
{
"Target", noIcon, "T", noMark, plain,
"-", noIcon, noKey, noMark, plain,
"Run", noIcon, "R", noMark, plain,
"Continue", noIcon, "K", noMark, plain,
"Step", noIcon, "S", noMark, plain,
"Next", noIcon, "N", noMark, plain
}
};
resource 'ALRT' (128) {
{40, 40, 229, 363},
128,
{ /* array: 4 elements */
/* [1] */
OK, visible, sound1,
/* [2] */
OK, visible, sound1,
/* [3] */
OK, visible, sound1,
/* [4] */
OK, visible, sound1
}
};
resource 'DITL' (128) {
{ /* array DITLarray: 4 elements */
/* [1] */
{164, 115, 184, 185},
Button {
enabled,
"OK"
},
/* [2] */
{5, 10, 43, 290},
StaticText {
disabled,
"MacGDB"
},
/* [3] */
{76, 3, 154, 301},
StaticText {
disabled,
"GNU Debugger"
"\nCopyright © 1994 Free Software Foundation Inc.\n"
"Written by Stan Shebs."
},
/* [4] */
{53, 82, 71, 227},
StaticText {
disabled,
"version 4.12.1"
}
}
};
resource 'WIND' (wConsole, preload, purgeable) {
{40, 40, 310, 572},
zoomDocProc,
visible,
goAway,
0x0,
"GDB Console"
};
resource 'SIZE' (-1) {
reserved,
acceptSuspendResumeEvents,
reserved,
canBackground,
multiFinderAware,
backgroundAndForeground,
dontGetFrontClicks,
ignoreChildDiedEvents,
not32BitCompatible,
isHighLevelEventAware,
localAndRemoteHLEvents,
notStationeryAware,
dontUseTextEditServices,
reserved,
reserved,
reserved,
4000*1024,
4000*1024
};
resource 'DLOG' (128) {
{40, 40, 240, 280},
documentProc,
visible,
goAway,
0x0,
128,
""
};