From 1c20608e02109ef0839e0168d100c75f0cc65fd9 Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Mon, 15 May 2000 10:49:38 +0000
Subject: Added f_eval_int() and EVAL configuration command.

---
 filter/config.Y | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

(limited to 'filter/config.Y')

diff --git a/filter/config.Y b/filter/config.Y
index 343c1e0..4c4a859 100644
--- a/filter/config.Y
+++ b/filter/config.Y
@@ -1,7 +1,7 @@
 /*
  *	BIRD - filters
  *
- *	Copyright 1998,1999 Pavel Machek
+ *	Copyright 1998--2000 Pavel Machek
  *
  *	Can be freely distributed and used under the terms of the GNU GPL.
  *
@@ -33,7 +33,7 @@ CF_KEYWORDS(FUNCTION, PRINT, PRINTN, UNSET, RETURN,
 	ADD, DELETE, CONTAINS, RESET,
 	PREPEND, MATCH,
 	EMPTY,
-	FILTER, WHERE)
+	FILTER, WHERE, EVAL)
 
 %nonassoc THEN
 %nonassoc ELSE
@@ -59,6 +59,11 @@ filter_def:
    }
  ;
 
+CF_ADDTO(conf, filter_eval)
+filter_eval:
+   EVAL term { f_eval_int($2); }
+ ;
+
 type:
    INT { $$ = T_INT; }
  | BOOL { $$ = T_BOOL; }
@@ -164,7 +169,7 @@ function_body:
 
 CF_ADDTO(conf, function_def)
 function_def:
-   FUNCTION SYM { DBG( "Begining of function %s\n", $2->name ); cf_push_scope($2); } function_params function_body {
+   FUNCTION SYM { DBG( "Beginning of function %s\n", $2->name ); cf_push_scope($2); } function_params function_body {
      extern struct f_inst *startup_func, *test1_func, *test2_func;
      cf_define_symbol($2, SYM_FUNCTION, $5);
      if (!strcasecmp($2->name, "__startup"))
-- 
cgit v1.2.3