 ;;; E-mail: jan@swi.psy.uva.nl
 
 ;;; This package forms a layer around the Quintus-Prolog interface.  It
-;;; should be used together with the Prolog library 'qp_interface.pl'.
+;;; should be used together with the Prolog library 'emacs_interface.pl'.
 
 ;;; It implements hooks that allow SWI-Prolog to give compilation-warnings
 ;;; back to EMACS, so the user can step through them using the normal

  (let (sofar)
    (cond ((setq sofar (prolog-completion-sofar))
	   (send-prolog (concat 
			 "'$silent'(qp_dabbrev_atom(\""
			 sofar
			 "\"))")))
	  (t

  (end-of-buffer)
  (setq *prolog-completion-process-mark*
	(marker-position (process-mark (get-buffer-process "*prolog*"))))
  (send-prolog "'$silent'(emacs_previous_command)"))


(defun prolog-next-command ()
