Implement the option 'interval for (send) and (sendln)

This commit is contained in:
HAYAMA_Kaoru
2024-12-01 12:54:17 +09:00
parent f3ccab6bae
commit f96eb75f49
2 changed files with 40 additions and 9 deletions
+2 -2
View File
@@ -28,8 +28,8 @@ func mains(args []string) error {
lisp = lisp.Flet(
gmnlisp.Functions{
gmnlisp.NewSymbol("send"): gmnlisp.Function1(g.send),
gmnlisp.NewSymbol("sendln"): gmnlisp.Function1(g.sendln),
gmnlisp.NewSymbol("send"): &gmnlisp.Function{Min: 1, F: g.send},
gmnlisp.NewSymbol("sendln"): &gmnlisp.Function{Min: 1, F: g.sendln},
gmnlisp.NewSymbol("spawn"): &gmnlisp.Function{Min: 1, F: g.spawn},
gmnlisp.NewSymbol("expect*"): gmnlisp.SpecialF(g.expectX),
gmnlisp.NewSymbol("expect"): gmnlisp.SpecialF(g.expect),