working on return-from-home for non-local return

2020-10-10 17:36:33 +00:00
parent d127456da8
commit b9f78f7c13
4 changed files with 140 additions and 47 deletions
--- a/lib/hcl.h
+++ b/lib/hcl.h
@ -1217,6 +1217,7 @@ struct hcl_t
 	hcl_oop_t _lambda; /* symbol */
 	hcl_oop_t _or;     /* symbol */
 	hcl_oop_t _return; /* symbol */
+	hcl_oop_t _return_from_home; /* symbol */
 	hcl_oop_t _set;    /* symbol */
 	hcl_oop_t _until;  /* symbol */
 	hcl_oop_t _while;  /* symbol */
@ -1425,6 +1426,7 @@ enum hcl_syncode_t
 	HCL_SYNCODE_LAMBDA,
 	HCL_SYNCODE_OR,
 	HCL_SYNCODE_RETURN,
+	HCL_SYNCODE_RETURN_FROM_HOME,
 	HCL_SYNCODE_SET,
 	HCL_SYNCODE_UNTIL,
 	HCL_SYNCODE_WHILE