diff options
| author | gingold <gingold@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-02-21 09:02:01 +0000 |
|---|---|---|
| committer | gingold <gingold@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-02-21 09:02:01 +0000 |
| commit | 473688e4785d7b5fb278709d30775db7faae9a9b (patch) | |
| tree | f74f3598f55218810a4f5ff279fe7e5df813ea6d /gcc/config/vms | |
| parent | 005acfe031fcf1711ec15ab7335ec1d4ec4c0393 (diff) | |
| download | gcc-473688e4785d7b5fb278709d30775db7faae9a9b.tar.gz | |
2012-02-21 Tristan Gingold <gingold@adacore.com>
* config/vms/vms-ld.c (main): Fix IDENTIFICATION padding.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@184426 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/config/vms')
| -rw-r--r-- | gcc/config/vms/vms-ld.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/config/vms/vms-ld.c b/gcc/config/vms/vms-ld.c index 18776fa2e38..cc57d8a24be 100644 --- a/gcc/config/vms/vms-ld.c +++ b/gcc/config/vms/vms-ld.c @@ -640,7 +640,7 @@ main (int argc, char **argv) { /* Comes from pragma Ident (). */ fprintf (optfile, "case_sensitive=yes\n"); - fprintf (optfile, "IDENTIFICATION=\"%15.15s\"\n", &argv[i][17]); + fprintf (optfile, "IDENTIFICATION=\"%-.15s\"\n", &argv[i][17]); fprintf (optfile, "case_sensitive=NO\n"); } } |