~ubuntu-branches/ubuntu/hardy/texmacs/hardy

« back to all changes in this revision

Viewing changes to plugins/pari/progs/init-pari.scm

  • Committer: Bazaar Package Importer
  • Author(s): Ralf Treinen
  • Date: 2004-04-19 20:34:00 UTC
  • Revision ID: james.westby@ubuntu.com-20040419203400-g4e34ih0315wcn8v
Tags: upstream-1.0.3-R2
ImportĀ upstreamĀ versionĀ 1.0.3-R2

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
 
 
2
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
3
;;
 
4
;; MODULE      : init-pari.scm
 
5
;; DESCRIPTION : Initialize pari plugin
 
6
;; COPYRIGHT   : (C) 1999  Joris van der Hoeven
 
7
;;
 
8
;; This software falls under the GNU general public license and comes WITHOUT
 
9
;; ANY WARRANTY WHATSOEVER. See the file $TEXMACS_PATH/LICENSE for details.
 
10
;; If you don't have this file, write to the Free Software Foundation, Inc.,
 
11
;; 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
12
;;
 
13
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
14
 
 
15
(define (pari-initialize)
 
16
  (import-from (texmacs plugin plugin-convert))
 
17
  (plugin-input-converters pari))
 
18
 
 
19
(define (cas-supports-completions-set! must-be-pari)
 
20
  ;; Hack for old versions of Pari
 
21
  (define (pari-commander s)
 
22
    (string-append (char->string #\002)
 
23
                   "special:" s
 
24
                   (char->string #\005) "\n"))
 
25
  (plugin-configure pari
 
26
    (:tab-completion #t)
 
27
    (:commander ,pari-commander)))
 
28
 
 
29
(plugin-configure pari
 
30
  (:require (url-exists-in-path? "gp"))
 
31
  (:initialize (pari-initialize))
 
32
  (:launch "gp --texmacs")
 
33
  (:session "Pari"))