From e53d8f768a2bcb331fe11ed5282d228a938ce161 Mon Sep 17 00:00:00 2001
From: Zefram <zefram@fysh.org>
Date: Fri, 15 Oct 2010 13:11:54 +0100
Subject: function to parse Perl code block

New API function parse_block() parses a code block, including surrounding
braces.  The block is a lexical scope, but not inherently a dynamic scope.
---
 embed.fnc | 1 +
 1 file changed, 1 insertion(+)

(limited to 'embed.fnc')

diff --git a/embed.fnc b/embed.fnc
index 0fa5ff1325..9411a68121 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -626,6 +626,7 @@ AMpd	|I32	|lex_peek_unichar|U32 flags
 AMpd	|I32	|lex_read_unichar|U32 flags
 AMpd	|void	|lex_read_space	|U32 flags
 : Public parser API
+AMpd	|OP*	|parse_block	|U32 flags
 AMpd	|OP*	|parse_fullstmt	|U32 flags
 AMpd	|OP*	|parse_stmtseq	|U32 flags
 : Used in various files
-- 
cgit v1.2.1