thrn on optimize again for buildglyphs.js
This commit is contained in:
parent
99d3c8ccd6
commit
74cb767002
|
@ -139,6 +139,7 @@ define [includeGlyphPart cg gs nm] : begin
|
|||
return : cg.include.apply cg [{gs.(nm)}.concat [{}.slice.call arguments 3]]
|
||||
|
||||
###### Canvas-based mechanism
|
||||
define [$donothing$] nothing
|
||||
define-macro sketch : syntax-rules
|
||||
`[sketch @::steps] : begin
|
||||
if [not externEnv.$nWFGlyphs$] : set externEnv.$nWFGlyphs$ 0
|
||||
|
@ -149,7 +150,7 @@ define-macro sketch : syntax-rules
|
|||
begin @::[steps.map formOf]
|
||||
set dependencyProfile.(currentGlyph.name) : getDependencyProfile currentGlyph
|
||||
return currentGlyph
|
||||
]] [create-glyph @{".quote" (".WF" + externEnv.$nWFGlyphs$)} [lambda]]]
|
||||
]] [create-glyph @{".quote" (".WF" + externEnv.$nWFGlyphs$)} $donothing$]]
|
||||
|
||||
define-macro branch : syntax-rules
|
||||
`[branch @::steps] : begin
|
||||
|
|
|
@ -1292,8 +1292,6 @@ symbol-block 'eszet'
|
|||
widths.center (STROKE * 1.1)
|
||||
corner tl (tm - STROKE) [heading UPWARD]
|
||||
corner (RIGHTSB - HALFSTROKE * 1.2 - OX) t [heading UPWARD]
|
||||
set this.italicHookAttachPoint {.x (l + HALFSTROKE) .y 0}
|
||||
|
||||
save 'eszet' 0xDF
|
||||
|
||||
sketch # Eszet
|
||||
|
|
|
@ -13,7 +13,7 @@ SCRIPTS = $(SUPPORT_FILES) buildglyphs.js
|
|||
SCRIPTS_FROM_aki = $(SUPPORT_FILES_FROM_aki) buildglyphs.js
|
||||
|
||||
buildglyphs.js : buildglyphs.ptl $(GLYPH_SEGMENTS)
|
||||
$(PATELC) --strict $< -o $@
|
||||
$(PATELC) --optimize --strict $< -o $@
|
||||
|
||||
$(SUPPORT_FILES_FROM_aki) :
|
||||
$(PATELC) --optimize --strict $< -o $@
|
||||
|
|
Loading…
Reference in New Issue
Block a user