From 3dac0de51f62b67c842e8dc1092043ee63c49c7b Mon Sep 17 00:00:00 2001 From: Brendan Kehoe Date: Thu, 14 Jan 1993 19:19:10 -0500 Subject: cccp.c (main): Trim down to the basename of what's to go in PROGNAME. * cccp.c (main): Trim down to the basename of what's to go in PROGNAME. From-SVN: r3248 --- gcc/cccp.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'gcc') diff --git a/gcc/cccp.c b/gcc/cccp.c index dd2dca5..6a7eb59 100644 --- a/gcc/cccp.c +++ b/gcc/cccp.c @@ -989,7 +989,10 @@ main (argc, argv) signal (SIGPIPE, pipe_closed); - progname = argv[0]; + p = argv[0] + strlen (argv[0]); + while (p != argv[0] && p[-1] != '/') --p; + progname = p; + #ifdef VMS { /* Remove directories from PROGNAME. */ -- cgit v1.1