[refactor] auto escape library filenames
This commit is contained in:
parent
2c79e1874c
commit
def57348c1
|
@ -4,14 +4,22 @@ from collections import OrderedDict
|
||||||
|
|
||||||
outfn = 'src/load_piclib.c'
|
outfn = 'src/load_piclib.c'
|
||||||
|
|
||||||
|
libs = [
|
||||||
|
'piclib/built-in.scm',
|
||||||
|
'piclib/srfi/1.scm',
|
||||||
|
'piclib/srfi/26.scm',
|
||||||
|
'piclib/srfi/95.scm',
|
||||||
|
]
|
||||||
|
|
||||||
if os.path.exists(outfn):
|
if os.path.exists(outfn):
|
||||||
os.remove(outfn)
|
os.remove(outfn)
|
||||||
|
|
||||||
piclibs = OrderedDict()
|
piclibs = OrderedDict()
|
||||||
piclibs['piclib/built-in.scm'] = 'piclib_built_in'
|
for lib in libs:
|
||||||
piclibs['piclib/srfi/1.scm'] = 'piclib_srfi_1'
|
vname = lib[:-4]
|
||||||
piclibs['piclib/srfi/26.scm'] = 'piclib_srfi_26'
|
vname = re.sub(r'/', r'_', vname)
|
||||||
piclibs['piclib/srfi/95.scm'] = 'piclib_srfi_95'
|
vname = re.sub(r'-', r'_', vname)
|
||||||
|
piclibs[lib] = vname
|
||||||
|
|
||||||
def escape_scm(infn, outfn, vname):
|
def escape_scm(infn, outfn, vname):
|
||||||
with open(outfn, 'a') as output:
|
with open(outfn, 'a') as output:
|
||||||
|
|
Loading…
Reference in New Issue