(a_write): Fix prototype.

diff --git a/src/fileio.c b/src/fileio.c
index 4d477b19c8ea90862fd9dae57be9bbd4837e8c7f..50c9662eea31b89f5d65c1f049779473b8b821f0 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -231,7 +231,7 @@ Lisp_Object Qfile_name_history;
 Lisp_Object Qcar_less_than_car;
 
 static int a_write P_ ((int, char *, int, int,
-                       Lisp_Object, struct coding_system *));
+                       Lisp_Object *, struct coding_system *));
 static int e_write P_ ((int, char *, int, struct coding_system *));
 \f
 void