shithub: femtolisp

Info  •  Files  •  Log  •  Branches

vm-stats: remove the earmuffs

--- a/flisp.c

+++ b/flisp.c

@@ -2214,7 +2214,7 @@

 	return FL_void;

 }

-BUILTIN("*vm-stats*", vm_stats)

+BUILTIN("vm-stats", vm_stats)

 {

 	USED(args);

 	argcount(nargs, 0);

--- a/test/torture.scm

+++ b/test/torture.scm

@@ -17,4 +17,4 @@

 (write (eval longg))

 (newline)

-(*vm-stats*)

+(vm-stats)