Function: prolog-consult-compile-region

prolog-consult-compile-region is a byte-compiled function defined in prolog.el.gz.

Signature

(prolog-consult-compile-region COMPILEP BEG END)

Documentation

Consult/compile region between BEG and END.

If COMPILEP is non-nil, compile, otherwise consult.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/prolog.el.gz
(defun prolog-consult-compile-region (compilep beg end)
  "Consult/compile region between BEG and END.
If COMPILEP is non-nil, compile, otherwise consult."
  ;(let ((file prolog-temp-filename)
  (let ((file (prolog-bsts (prolog-temporary-file)))
        (lines (count-lines 1 beg)))
    (write-region beg end file nil 'no-message)
    (write-region "\n" nil file t 'no-message)
    (prolog-consult-compile compilep file
                            (if (bolp) (1+ lines) lines))
    (delete-file file)))