Mercurial > forge

annotate extra/engine/engOutputBuffer.c @ 0:6b33357c7561 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial revision
author pkienzle
date Wed, 10 Oct 2001 19:54:49 +0000
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
1 #include <stdio.h>
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
2 #include "engine.h"
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
3
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
4 int matbuffer = 0;
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
5 char* matbufptr = NULL;
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
6 int matbufcnt = 0;
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
7
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
8 int engOutputBuffer( Engine *ep, char *p, int n )
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
9 {
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
10
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
11 #ifdef DEBUGAPI
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
12 fprintf( stdout, "Begin engOutputBuffer ...\n" );
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
13 fflush( stdout );
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
14 #endif
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
15
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
16 if( p != NULL )
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
17 {
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
18 matbufptr = p;
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
19 matbufcnt = n;
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
20 }
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
21 else
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
22 {
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
23 matbufptr = NULL;
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
24 matbufcnt = 0;
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
25 }
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
26
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
27 #ifdef DEBUGAPI
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
28 fprintf( stdout, "Exit engOutputBuffer with status %d\n", 0 );
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
29 fflush( stdout );
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
30 #endif
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
31
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
32 return 0;
6b33357c7561 Initial revision
pkienzle
parents:
diff changeset
33 }