]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - Ada95/gen/gen.c
ncurses 6.2 - patch 20200222
[ncurses.git] / Ada95 / gen / gen.c
index fd759ba45a41d5755f346f430372628915fae858..22efff8e51ea2ca84af8be5ff79116079cbfc83b 100644 (file)
@@ -1,5 +1,6 @@
 /****************************************************************************
- * Copyright (c) 1998-2014,2016 Free Software Foundation, Inc.              *
+ * Copyright 2020 Thomas E. Dickey                                          *
+ * Copyright 1998-2014,2016 Free Software Foundation, Inc.                  *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
@@ -32,7 +33,7 @@
 
 /*
     Version Control
-    $Id: gen.c,v 1.70 2016/02/13 22:00:22 tom Exp $
+    $Id: gen.c,v 1.72 2020/02/22 21:01:00 tom Exp $
   --------------------------------------------------------------------------*/
 /*
   This program prints on its standard output the source for the
@@ -179,8 +180,17 @@ main(int argc, const char *argv[])
   if (argc != 2)
     my_error("Only one argument expected (DFT_ARG_SUFFIX)");
 
-  printf("--  Generated by the C program %s (source " __FILE__ ").\n",
-        my_program_invocation_name);
+  if ((strlen(argv[0]) + strlen(__FILE__)) > 25)
+    {
+      printf("--  Generated by the C program %.40s.\n",
+            my_program_invocation_name);
+    }
+  else
+    {
+      printf("--  Generated by the C program %s (source %s).\n",
+            my_program_invocation_name,
+            __FILE__);
+    }
   printf("--  Do not edit this file directly.\n");
   printf("--  The values provided here may vary on your system.\n");
   printf("\n");