X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/c0ece6a5c4c8dc87be1da6808289c88de19d8398..d0fffa3f69eb3401bf9ee2ee38c235e830c18abd:/src/m/ibms390x.h

diff --git a/src/m/ibms390x.h b/src/m/ibms390x.h
index 14228b61e5..04092d6e1a 100644
--- a/src/m/ibms390x.h
+++ b/src/m/ibms390x.h
@@ -24,7 +24,7 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 
 /* Define the type to use.  */
 #define EMACS_INT long
-#define pEd "ld"
+#define pI "l"
 #define EMACS_UINT unsigned long
 
 /* On the 64 bit architecture, we can use 60 bits for addresses */