[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Axiom-developer] Re: tm_axiom

From: Joris van der Hoeven
Subject: Re: [Axiom-developer] Re: tm_axiom
Date: Thu, 16 Oct 2003 17:08:26 +0200 (CEST)

Andrey: could you please try to patch your tm_axiom.c program
in order to make it compatible with everybody? I think that this
should be most easy for you, using what Mike, David and Bill have
been saying... Notice that you can find a binary tarball at

for the free version of Axiom. Just download


and set the AXIOM and PATH environement variables as needed.

If supporting both versions of axiom in a single plugin turns out
to be too difficult, I can also rename axiom -> nag-axiom for
NAG's version of Axiom.

> I think that you're missing the point.  Its not a case of having two
> tm_axioms for two versions of axiom, its a case of having two tm_axioms
> for two different ways of invoking *the same* axiom.  It just happens
> that the open version of axiom is still incomplete and doesn't yet
> exhibit both forms of behaviour.
> I don't quite understand what the problem is in any case.  You can
> always turn prompts off completely (")set message prompt none") if you
> like (in axiom.input or mysyns.input depending on whether its a
> system-wide change or not).
> If you really need exactly one prompt, then you can add the following to
> the axiom.input/mysyns.input file, which will suppress the initial
> prompt when Axiom is started by sman (i.e. when the $SpadServer variable
> is set).
> )lisp (DEFUN MKPROMPT NIL (COND ((and |$SpadServer| (|BOOT-EQUAL| 
> |$interpreterFrameName| '|initial|)) (MAKESTRING "")) ((|BOOT-EQUAL| 
> |$inputPromptType| '|none|) (MAKESTRING "")) ((|BOOT-EQUAL| 
> |$inputPromptType| '|plain|) (MAKESTRING "-> ")) ((|BOOT-EQUAL| 
> |$inputPromptType| '|step|) (STRCONC (MAKESTRING "(") (STRINGIMAGE 
> |$IOindex|) (MAKESTRING ") -> "))) ((|BOOT-EQUAL| |$inputPromptType| 
> '|frame|) (STRCONC (STRINGIMAGE |$interpreterFrameName|) (MAKESTRING " (") 
> |$interpreterFrameName|) (MAKESTRING " [") (SUBSTRING (CURRENTTIME) 8 NIL) 
> (MAKESTRING "] [") (STRINGIMAGE |$IOindex|) (MAKESTRING "] -> ")))) )
> Its a bit ugly since it all has to be on one line but should work ...

reply via email to

[Prev in Thread] Current Thread [Next in Thread]