Wild Life  2.29
 All Data Structures Files Functions Variables Typedefs Macros
templates.c
Go to the documentation of this file.
1 /* Copyright 1991 Digital Equipment Corporation.
2  * All Rights Reserved.
3 *****************************************************************/
4 /* $Id: templates.c,v 1.2 1994/12/08 23:33:53 duchier Exp $ */
5 
6 #include "defs.h"
7 
8 
9 /******** next things have to be defined in a header file
10 */
11 
12 
13 
14 /******** GET_ARG
15 
16  assign the argument "number" of the goal "g" in "arg".
17  return FALSE if bad argument.
18 */
19 
20 long get_arg (g, arg, number)
21 
22 ptr_psi_term g, *arg;
23 char *number;
24 {
25  ptr_node n;
26 
27 
28  if ((n = find (FEATCMP, number, g->attr_list)))
29  return (*arg = (ptr_psi_term) n->data) ? TRUE: FALSE;
30  else
31  return FALSE;
32 }
33 
34 
35 
#define FEATCMP
Definition: def_const.h:257
GENERIC data
Definition: def_struct.h:185
long get_arg(ptr_psi_term g, ptr_psi_term *arg, char *number)
Definition: templates.c:20
#define TRUE
Definition: def_const.h:127
#define FALSE
Definition: def_const.h:128
ptr_node find(long comp, char *keystr, ptr_node tree)
Definition: trees.c:341