OpenXM_contrib2/asir2000/parse/parser.c - diff

Return to parser.c CVS log

Up to [local] / OpenXM_contrib2 / asir2000 / parse

version 1.2, 2000/08/21 08:31:47

version 1.4, 2001/09/04 03:12:20

Line 23

* shall be made on your publication or presentation in any form of the

* results obtained by use of the SOFTWARE.

* (4) In the event that you modify the SOFTWARE, you shall notify FLL by

* e-mail at risa-admin@flab.fujitsu.co.jp of the detailed specification

* e-mail at risa-admin@sec.flab.fujitsu.co.jp of the detailed specification

* for such modification or the source code of the modified part of the

* SOFTWARE.

Line 45

* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,

* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.

* $OpenXM: OpenXM_contrib2/asir2000/parse/parser.c,v 1.1.1.1 1999/12/03 07:39:12 noro Exp $

* $OpenXM: OpenXM_contrib2/asir2000/parse/parser.c,v 1.3 2000/08/22 05:04:27 noro Exp $

#include <ctype.h>

#include "ca.h"

Line 100 FNODE *exprp;

}

extern FUNC user_print_function;

void read_eval_loop() {

struct oEGT egt0,egt1;

extern int prtime,prresult,ox_do_copy;

Line 120 void read_eval_loop() {

Line 122 void read_eval_loop() {

r1 = get_rtime();

if ( !ox_do_copy ) {

if ( prresult ) {

printexpr(CO,LastVal); putc('\n',asir_out);

if ( user_print_function )

bevalf(user_print_function,mknode(1,LastVal));

else

printexpr(CO,LastVal);

putc('\n',asir_out);

fflush(asir_out);

}

if ( prtime ) {