Aliased glyph cleanup

This commit is contained in:
be5invis 2020-07-29 22:17:50 -07:00
parent 86038037c0
commit d0f37b5464
8 changed files with 194 additions and 212 deletions

View file

@ -99,10 +99,10 @@ define-macro create-glyph : syntax-rules
`[create-glyph @name @code @body] : begin
dirty `[$createAndSaveGlyphImpl$ @[formOf name] @[formOf code] @[formOf body]]
define-macro create-aliased : syntax-rules
`[create-aliased @name] : begin
dirty `[create-aliased @[formOf name] null]
`[create-aliased @name @code] : begin
define-macro create-aliased-glyph : syntax-rules
`[create-aliased-glyph @name] : begin
dirty `[create-aliased-glyph @[formOf name] null]
`[create-aliased-glyph @name @code] : begin
dirty `[$createAndSaveGlyphImpl$ @[formOf name] @[formOf code] [lambda : begin
[this.include currentGlyph true true]
[this.cloneRankFromGlyph currentGlyph] ]]