aboutsummaryrefslogtreecommitdiffstats
path: root/src/coding.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/coding.c')
-rw-r--r--src/coding.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/coding.c b/src/coding.c
index c14a41036ac..c129c94203c 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -9282,14 +9282,15 @@ usage: (find-operation-coding-system OPERATION ARGUMENTS...) */)
9282 || !NATNUMP (target_idx = Fget (operation, Qtarget_idx))) 9282 || !NATNUMP (target_idx = Fget (operation, Qtarget_idx)))
9283 error ("Invalid first argument"); 9283 error ("Invalid first argument");
9284 if (nargs < 1 + XFASTINT (target_idx)) 9284 if (nargs < 1 + XFASTINT (target_idx))
9285 error ("Too few arguments for operation: %s", 9285 error ("Too few arguments for operation `%s'",
9286 SDATA (SYMBOL_NAME (operation))); 9286 SDATA (SYMBOL_NAME (operation)));
9287 target = args[XFASTINT (target_idx) + 1]; 9287 target = args[XFASTINT (target_idx) + 1];
9288 if (!(STRINGP (target) 9288 if (!(STRINGP (target)
9289 || (EQ (operation, Qinsert_file_contents) && CONSP (target) 9289 || (EQ (operation, Qinsert_file_contents) && CONSP (target)
9290 && STRINGP (XCAR (target)) && BUFFERP (XCDR (target))) 9290 && STRINGP (XCAR (target)) && BUFFERP (XCDR (target)))
9291 || (EQ (operation, Qopen_network_stream) && INTEGERP (target)))) 9291 || (EQ (operation, Qopen_network_stream) && INTEGERP (target))))
9292 error ("Invalid %"pI"dth argument", XFASTINT (target_idx) + 1); 9292 error ("Invalid argument %"pI"d of operation `%s'",
9293 XFASTINT (target_idx) + 1, SDATA (SYMBOL_NAME (operation)));
9293 if (CONSP (target)) 9294 if (CONSP (target))
9294 target = XCAR (target); 9295 target = XCAR (target);
9295 9296