feat: floating point numbers

This commit is contained in:
2026-07-21 22:16:50 +02:00
parent 62dc0f30eb
commit 6d022219c3
3 changed files with 58 additions and 17 deletions
+4 -2
View File
@@ -41,7 +41,7 @@ struct s_Node {
union {
Nob_String_View as_symbol;
Nodes *as_list;
long long as_number;
double as_number;
struct {
Nob_String_View name;
LispFunction apply;
@@ -90,7 +90,6 @@ int lisp_function_add(Nodes args, Scopes *scopes, Node *result);
int lisp_function_sub(Nodes args, Scopes *scope, Node *result);
int lisp_function_div(Nodes args, Scopes *scope, Node *result);
int lisp_function_mul(Nodes args, Scopes *scope, Node *result);
int lisp_function_mod(Nodes args, Scopes *scope, Node *result);
int lisp_function_eq(Nodes args, Scopes *scope, Node *result);
int lisp_function_lt(Nodes args, Scopes *scope, Node *result);
@@ -105,4 +104,7 @@ int lisp_function_length(Nodes args, Scopes *scope, Node *result);
int lisp_function_isnull(Nodes args, Scopes *scope, Node *result);
int lisp_function_builtins(Nodes args, Scopes *scopes, Node *result);
int lisp_function_floor(Nodes args, Scopes *scopes, Node *result);
int lisp_function_ceil(Nodes args, Scopes *scopes, Node *result);
#endif // LISP_H