From 378683d25bdae89fa446b2b82f8dda5d6b34ea33 Mon Sep 17 00:00:00 2001
From: Marc Vertes <mvertes@free.fr>
Date: Thu, 14 Mar 2024 14:37:32 +0100
Subject: feat: initial support of closures

Also detection and automatic execution of main function.
Make sure that all debug is output to stderr.
---
 parser/parse.go | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

(limited to 'parser/parse.go')

diff --git a/parser/parse.go b/parser/parse.go
index 547957b..36ff125 100644
--- a/parser/parse.go
+++ b/parser/parse.go
@@ -24,6 +24,7 @@ type Parser struct {
 	labelCount    map[string]int
 	breakLabel    string
 	continueLabel string
+	clonum        int // closure instance number
 }
 
 func (p *Parser) Scan(s string, endSemi bool) (Tokens, error) {
@@ -203,7 +204,13 @@ func (p *Parser) ParseFunc(in Tokens) (out Tokens, err error) {
 	// TODO: handle receiver (methods)
 	// TODO: handle parametric types (generics)
 	// TODO: handle variadic parameters
-	fname := in[1].Str
+	var fname string
+	if in[1].Id == lang.Ident {
+		fname = in[1].Str
+	} else {
+		fname = "#f" + strconv.Itoa(p.clonum)
+		p.clonum++
+	}
 	ofname := p.fname
 	p.fname = fname
 	ofunc := p.function
-- 
cgit v1.2.3