From 4d8468e42fee7e325d9f6c3468f0b32d5f177fce Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 16 Jan 2010 01:09:48 +0000 Subject: give full nameoffile when (un)dumping fails; suggestion on tex-k from mpg, 18 Oct 2008 14:08:15 git-svn-id: svn://tug.org/texlive/trunk@16737 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/lib/ChangeLog | 5 +++++ Build/source/texk/web2c/lib/texmfmp.c | 7 ++++--- 2 files changed, 9 insertions(+), 3 deletions(-) (limited to 'Build/source/texk/web2c/lib') diff --git a/Build/source/texk/web2c/lib/ChangeLog b/Build/source/texk/web2c/lib/ChangeLog index 5090b24c57e..6f13ddd94db 100644 --- a/Build/source/texk/web2c/lib/ChangeLog +++ b/Build/source/texk/web2c/lib/ChangeLog @@ -1,3 +1,8 @@ +2010-01-16 Karl Berry + + * texmfmp.c (do_dump, do_undump): give full name of file + in fatal message when something cannot be (un)dumped. + 2010-01-02 Karl Berry * texmfmp.c (runsystem): doc fix. diff --git a/Build/source/texk/web2c/lib/texmfmp.c b/Build/source/texk/web2c/lib/texmfmp.c index 52ab3da4c9a..bca3631909a 100644 --- a/Build/source/texk/web2c/lib/texmfmp.c +++ b/Build/source/texk/web2c/lib/texmfmp.c @@ -2165,8 +2165,8 @@ do_dump (char *p, int item_size, int nitems, FILE *out_file) if (fwrite (p, item_size, nitems, out_file) != nitems) #endif { - fprintf (stderr, "! Could not write %d %d-byte item(s).\n", - nitems, item_size); + fprintf (stderr, "! Could not write %d %d-byte item(s) to %s.\n", + nitems, item_size, nameoffile+1); uexit (1); } @@ -2192,7 +2192,8 @@ do_undump (char *p, int item_size, int nitems, FILE *in_file) #else if (fread (p, item_size, nitems, in_file) != (size_t) nitems) #endif - FATAL2 ("Could not undump %d %d-byte item(s)", nitems, item_size); + FATAL3 ("Could not undump %d %d-byte item(s) from %s", + nitems, item_size, nameoffile+1); #if !defined (WORDS_BIGENDIAN) && !defined (NO_DUMP_SHARE) swap_items (p, nitems, item_size); -- cgit v1.2.3