diff --git a/lib/comp.c b/lib/comp.c
index 53dcb1f..e386be8 100644
--- a/lib/comp.c
+++ b/lib/comp.c
@@ -4792,7 +4792,6 @@ static HCL_INLINE int post_lambda (hcl_t* hcl)
 		 * the block has been exited(blk.depth--) before finding 'x' in the outer scope.
 		 */
 		hcl_cnode_t* defun_name = cf->operand;
-		hcl_oow_t index;
 		hcl_var_info_t vi;
 		int x;
 
@@ -4826,7 +4825,6 @@ static HCL_INLINE int post_lambda (hcl_t* hcl)
 			}
 			else
 			{
-				HCL_ASSERT (hcl, index <= HCL_SMOOI_MAX); 
 				SWITCH_TOP_CFRAME (hcl, COP_EMIT_SET, defun_name); 
 				cf = GET_TOP_CFRAME(hcl);
 				cf->u.set.vi = vi;
diff --git a/lib/exec.c b/lib/exec.c
index 6d9ca76..c866c0a 100644
--- a/lib/exec.c
+++ b/lib/exec.c
@@ -1906,7 +1906,7 @@ static int prepare_new_context (hcl_t* hcl, hcl_oop_block_t op_blk, hcl_ooi_t na
 
 	hcl_oop_context_t blkctx;
 	hcl_ooi_t tmpr_mask;
-	hcl_ooi_t fblk_nrvars, fblk_nlvars, flags;
+	hcl_ooi_t fblk_nrvars, fblk_nlvars;
 	hcl_ooi_t fixed_nargs, actual_nargs, excess_nargs;
 
 	/* the receiver must be a block context */
diff --git a/lib/hcl-prv.h b/lib/hcl-prv.h
index bd7fa50..952ccdf 100644
--- a/lib/hcl-prv.h
+++ b/lib/hcl-prv.h
@@ -1505,6 +1505,7 @@ hcl_cnode_t* hcl_makecnodetrue (hcl_t* hcl, const hcl_ioloc_t* loc, const  hcl_o
 hcl_cnode_t* hcl_makecnodefalse (hcl_t* hcl, const hcl_ioloc_t* loc, const  hcl_oocs_t* tok);
 hcl_cnode_t* hcl_makecnodeself (hcl_t* hcl, const hcl_ioloc_t* loc, const  hcl_oocs_t* tok);
 hcl_cnode_t* hcl_makecnodeellipsis (hcl_t* hcl, const hcl_ioloc_t* loc, const  hcl_oocs_t* tok);
+hcl_cnode_t* hcl_makecnodetrpcolons (hcl_t* hcl, const hcl_ioloc_t* loc, const  hcl_oocs_t* tok);
 hcl_cnode_t* hcl_makecnodecharlit (hcl_t* hcl, const hcl_ioloc_t* loc, const  hcl_oocs_t* tok, const hcl_ooch_t v);
 hcl_cnode_t* hcl_makecnodesymbol (hcl_t* hcl, const hcl_ioloc_t* loc, const  hcl_oocs_t* tok);
 hcl_cnode_t* hcl_makecnodedsymbol (hcl_t* hcl, const hcl_ioloc_t* loc, const  hcl_oocs_t* tok);