kitty.h
上传用户:dgyhgb
上传日期:2007-01-07
资源大小:676k
文件大小:2k
源码类别:

SQL Server

开发平台:

Unix_Linux

  1. /*
  2.  *  kitty.h  - description of support library for generated functions
  3.  *
  4.  *  This file is a part of GNU SQL Server
  5.  *
  6.  *  Copyright (c) 1996, 1997, Free Software Foundation, Inc
  7.  *  Developed at the Institute of System Programming
  8.  *  This file is written by Andrew Yahin
  9.  * 
  10.  *  This program is free software; you can redistribute it and/or modify
  11.  *  it under the terms of the GNU General Public License as published by
  12.  *  the Free Software Foundation; either version 2 of the License, or
  13.  *  (at your option) any later version.
  14.  *
  15.  *  This program is distributed in the hope that it will be useful,
  16.  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  17.  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18.  *  GNU General Public License for more details.
  19.  *
  20.  *  You should have received a copy of the GNU General Public License
  21.  *  along with this program; if not, write to the Free Software
  22.  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  23.  *
  24.  *  Contacts: gss@ispras.ru
  25.  */
  26. /* $Id: kitty.h,v 1.245 1997/03/31 03:46:38 kml Exp $ */
  27. #ifndef __KITTY_H__
  28. #define __KITTY_H__
  29. #include "global.h"
  30. #define OPs_IND(x)       ( MASK_TRN(x) & ((1<<VCB_F)-1))-1
  31. #define RULE_NAME(s)     STRING(XLTR_TRN(s,0))
  32. #define RULE_PATTERN(r)  XTXT_TRN(r,5)
  33. #define RULE_STR(s)      XLTR_TRN(s,6)
  34. typedef i4_t (*Rule1_type) __P((TXTREF n,i4_t sel));
  35. TXTREF mk_node __P((enum token root,...));
  36. TXTREF mk_vect __P((i4_t of_longs,i4_t len,...));
  37. i4_t    t_compare  __P((TXTREF x,TXTREF y,TXTREF *Ops /*[15]*/ ,Rule1_type Rule1));
  38. void   arity_trn __P((TXTREF oper));
  39. TXTREF rl_corrector __P((i4_t line,TXTREF node,TXTREF right_link));
  40. TXTREF dl_corrector __P((i4_t line,TXTREF node,TXTREF addit_down_link));
  41. TXTREF del_op __P(( TXTREF o,TXTREF p));
  42. TXTREF replace_node __P((TXTREF s,TXTREF d,TXTREF p));
  43. TXTREF image  __P((TXTREF p,TXTREF dest,TXTREF src));
  44. TXTREF insert_node __P((i4_t before,TXTREF p,TXTREF dest,TXTREF src));
  45. TXTREF copy_tree  __P((TXTREF src));
  46. void   emit_trn_constructor __P((TXTREF s,i4_t look_to_the_right));
  47. /* the following function are made for freeing patterns' memory */
  48. void    register_pattern __P((TXTREF *pattern));
  49. TXTREF *pattern_name __P((char *p_n));
  50. #define free_patterns() register_pattern(NULL)
  51. #define free_pat_mem()  register_pattern(NULL)
  52. #define PATTERN(var,tree)     (var=(var?var:(register_pattern(&var),(tree))))
  53. #define ANONYM_P(name,tree)   INIT_PATTERN(*pattern_name(name),tree)
  54. #define SIMPLE2L(s)           ((i4_t)(s))
  55.                          
  56. #endif