BSD 1 development

[unix-history] / pxref / pxref.c

/*
 * pxref - driver to put in /usr/bin/ to call pxref as a Pascal program
 *
 * Bill Joy UCB July 29, 1977
 *
 * This program is not needed if the shell in use understands Pascal
 * objects.
 */

char *progname;

main(argc, argv)
	int argc;
	char *argv[];
{

	argc--, progname = *argv++;
	if (argc == 0 || argc > 2) {
		printf("usage: %s [ - ] file\n", progname);
		exit(1);
	}
	if (argc == 1) {
		argv--;
		argv[0] = argv[1];
		argv[1] = 0;
	}
	execl("/bin/px", "px", "/usr/lib/pxref", argv[0], argv[1], 0);
	execl("/usr/bin/px", "pcx", "/usr/lib/pxref", argv[0], argv[1], 0);
	write(2, "Can't find px\n", 14);
	exit(1);
}