home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
plbin.zip
/
pl
/
lisp
/
qpstart.el
< prev
next >
Wrap
Lisp/Scheme
|
1992-05-26
|
1KB
|
36 lines
;;; SCCS: @(#)89/11/21 qpstart.el 1.1
;;; Quintus Prolog - GNU Emacs Interface
;;; Support Functions
;;;
;;; Consolidated by Sitaram Muralidhar
;;;
;;; sitaram@quintus.com
;;; Quintus Computer Systems, Inc.
;;; 2 May 1989
;;;
;;; This file defines functions that support the Quintus Prolog - GNU Emacs
;;; interface.
;;;
;;; Acknowledgements
;;;
;;;
;;; This interface was made possible by contributions from Fernando
;;; Pereira and various customers of Quintus Computer Systems, Inc.,
;;; based on code for Quintus's Unipress Emacs interface.
;;;
;;; Define load-path argument.
;;;
(defconst load-path-arg 2
"The argument in command-line-args which identifies the directory in
which the Quintus Prolog Emacs interface files are located")
;;;
;;; Set load-path variable.
;;;
(setq load-path (cons
(file-name-directory
(nth load-path-arg command-line-args))
load-path))
;;; Load the rest
(load "qprolog-mode" nil t)