File: exp_prog.h

package info (click to toggle)
expect 5.45-2
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 2,836 kB
  • sloc: ansic: 17,881; sh: 7,167; exp: 576; makefile: 178; tcl: 14
file content (22 lines) | stat: -rw-r--r-- 630 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
/* exp_prog.h - private symbols common to both expect program and library

Written by: Don Libes, libes@cme.nist.gov, NIST, 12/3/90

Design and implementation of this program was paid for by U.S. tax
dollars.  Therefore it is public domain.  However, the author and NIST
would appreciate credit if this program or parts of it are used.
*/

#ifndef _EXPECT_PROG_H
#define _EXPECT_PROG_H

#include "expect_tcl.h"
#include "exp_int.h"

/* yes, I have a weak mind */
#define streq(x,y)	(0 == strcmp((x),(y)))

/* Constant strings for NewStringObj */
#define LITERAL(s) Tcl_NewStringObj ((s), sizeof(s)-1)

#endif /* _EXPECT_PROG_H */