summaryrefslogtreecommitdiff
path: root/src/mocklisp.c
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-07-12 06:41:26 +0000
committerRichard M. Stallman <rms@gnu.org>1997-07-12 06:41:26 +0000
commit388017731f7ec4bca5f8f24921b9948e791f4b00 (patch)
treeba429759dc07949fdab4171bd21de7a092beb97c /src/mocklisp.c
parentb7df898e37821391884bdb3d33286d5d4152c7bc (diff)
downloademacs-388017731f7ec4bca5f8f24921b9948e791f4b00.tar.gz
(Fml_arg): Add missing Fread_string arguments.
Diffstat (limited to 'src/mocklisp.c')
-rw-r--r--src/mocklisp.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/mocklisp.c b/src/mocklisp.c
index ad6ae9908c7..3b0276f9ce3 100644
--- a/src/mocklisp.c
+++ b/src/mocklisp.c
@@ -120,7 +120,7 @@ DEFUN ("ml-arg", Fml_arg, Sml_arg, 1, 2, 0,
Lisp_Object n, prompt;
{
if (EQ (Vmocklisp_arguments, Qinteractive))
- return Fread_string (prompt, Qnil);
+ return Fread_string (prompt, Qnil, Qnil, Qnil);
CHECK_NUMBER (n, 0);
XSETINT (n, XINT (n) - 1); /* Mocklisp likes to be origin-1 */
return Fcar (Fnthcdr (n, Vmocklisp_arguments));