2 files changed, 15 insertions, 0 deletions
diff --git a/match.c b/match.c
index 0a819841..46ca1559 100644
--- a/match.c
+++ b/match.c
@@ -4580,6 +4580,7 @@ static void dir_tables_init(void)
   sethash(h_directive_table, choose_s, cptr(coerce(mem_t *, h_parallel)));
   sethash(h_directive_table, trailer_s, cptr(coerce(mem_t *, h_trailer)));
   sethash(h_directive_table, define_s, cptr(coerce(mem_t *, h_define)));
+  sethash(h_directive_table, throw_s, cptr(coerce(mem_t *, hv_trampoline)));
   sethash(h_directive_table, eol_s, cptr(coerce(mem_t *, h_eol)));
   sethash(h_directive_table, chr_s, cptr(coerce(mem_t *, h_chr)));
   sethash(h_directive_table, do_s, cptr(coerce(mem_t *, h_do)));
diff --git a/txr.1 b/txr.1
index d78712f0..6daca213 100644
--- a/txr.1
+++ b/txr.1
@@ -9688,6 +9688,20 @@ can take
 whatever value the corresponding throw argument provides, so it ends up with
 .strn lc .
 
+There is a horizontal form of
+.codn throw .
+For instance:
+
+.cblk
+  abc@(throw e 1)
+.cble
+
+throws exception
+.code e
+if
+.code abc
+matches.
+
 .dir defex
 
 The