causa-arcana-misc
/
lesson-lisp
1
0
Fork 0
Code

Add comments

This commit is contained in:
Alex Kotov 2023-05-07 17:44:50 +04:00
parent dc8d81a382
commit 522936f222
Signed by: kotovalexarian
GPG Key ID: 553C0EBBEB5D5F08
2 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/syntax.c
View File

@ -5,6 +5,10 @@
#include <assert.h>
/*******************************************
* Special syntax to use in the executable *
*******************************************/
struct Object *syntax_repl(
struct Object *args,
struct Object *const environment
@ -19,6 +23,10 @@ struct Object *syntax_script(
return eval(args, environment);
}
/*******************
* Syntax keywords *
*******************/
struct Object *syntax_begin(
struct Object *args,
struct Object *const environment

8
src/syntax.h
View File

@ -3,9 +3,17 @@
#include "object.h"
/*******************************************
* Special syntax to use in the executable *
*******************************************/
struct Object *syntax_repl(struct Object *args, struct Object *environment);
struct Object *syntax_script(struct Object *args, struct Object *environment);
/*******************
* Syntax keywords *
*******************/
struct Object *syntax_begin(struct Object *args, struct Object *environment);
struct Object *syntax_define(struct Object *args, struct Object *environment);
struct Object *syntax_if(struct Object *args, struct Object *environment);