New directive: mdo.

* eval.h (progn_s): Declarationa added.

* match.c (mdo_s): New symbol variable.
(syms_init): Initialize mdo_s.

* match.h (mdo_s): Declared.

* parser.y (check_for_include): Renamed to check_parse_time_action
and implements mdo, not only include.
(clauses_rev): Follow rename of function.

* txr.1: Documented.

1 files changed, 1 insertions, 1 deletions

diff --git a/match.h b/match.h
index 77ddfcb5..9894ecff 100644
--- a/match.h
+++ b/match.h
@@ -25,7 +25,7 @@
  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  */
 
-extern val text_s, choose_s, gather_s, do_s, require_s;
+extern val text_s, choose_s, gather_s, do_s, mdo_s, require_s;
 extern val close_s, load_s, include_s, mod_s, modlast_s, line_s;
 extern val counter_k, vars_k, env_k, var_k, into_k, named_k;
 val match_expand_keyword_args(val elem);