sforman
/
Thun
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

minor cleanup

This commit is contained in:
Simon Forman 2023-02-05 13:53:53 -08:00
parent 8bda5d511a
commit ccbf8d2b4c
2 changed files with 31 additions and 41 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
implementations/C/convert_defs.py
View File

@ -39,13 +39,6 @@ disenstacken ? [uncons ?] loop pop
swons swap cons swons swap cons
infra swons swaack [i] dip swaack'''.splitlines() infra swons swaack [i] dip swaack'''.splitlines()
##
##for line in defs:
## name, body = line.split(None, 1)
## print(f'{name}, def_{name}')
##
##print()
##print()
print(f'''\ print(f'''\
/* /*
@ -60,7 +53,6 @@ if sys.argv[-1] == '--header':
name, body = line.split(None, 1) name, body = line.split(None, 1)
print(f'void def_{name}(JoyListPtr stack, JoyListPtr expression);') print(f'void def_{name}(JoyListPtr stack, JoyListPtr expression);')
elif sys.argv[-1] == '--keywords': elif sys.argv[-1] == '--keywords':
sys.stdout.write(open('KEYWORDS.in').read()) sys.stdout.write(open('KEYWORDS.in').read())
for line in defs: for line in defs:
@ -68,8 +60,7 @@ elif sys.argv[-1] == '--keywords':
print(f'{name}, def_{name}') print(f'{name}, def_{name}')
else: else:
print('''\
print('''
#include "joy.h" #include "joy.h"
#include "definitions.h" #include "definitions.h"

1
implementations/C/definitions.c
View File

@ -3,7 +3,6 @@ Auto-generated file by convert_defs.py
Do not edit. Do not edit.
*/ */
#include "joy.h" #include "joy.h"
#include "definitions.h" #include "definitions.h"