implemented high colon position with multi colons

This commit is contained in:
be5invis 2016-07-11 09:10:49 +08:00
parent d6466c3824
commit e8fc7ee62b

View File

@ -215,8 +215,10 @@ export : define [apply para glyphList] : begin
chain-rule (stick ~> [lsx 'fj']) less # -<, =<
:> only {'hask'}
chain-rule ({'colon'} ~> {'colon.mid'}) {'greater' 'less' 'hyphen' 'equal' 'plus'} # :> :- := :< :+
chain-rule {'greater' 'less' 'hyphen' 'equal' 'plus'} ({'colon'} ~> {'colon.mid'}) # <: >: -: =: +:
chain-rule ({'colon'} ~> {'colon.mid'}) {'greater' 'less' 'hyphen' 'equal' 'plus' 'colon.mid'} # :> :- := :< :+
chain-rule ({'colon'} ~> {'colon.mid'}) ({'colon'} ~> {'colon.mid'}) {'greater' 'less' 'hyphen' 'equal' 'plus' 'colon.mid'} # ::> ::- ::= ::< ::+
chain-rule ({'colon'} ~> {'colon.mid'}) ({'colon'} ~> {'colon.mid'}) ({'colon'} ~> {'colon.mid'}) {'greater' 'less' 'hyphen' 'equal' 'plus' 'colon.mid'} # :::> :::- :::= :::< :::+
chain-rule {'greater' 'less' 'hyphen' 'equal' 'plus' 'colon.mid'} ({'colon'} ~> {'colon.mid'}) # <: >: -: =: +:
#opbd
local fwclose {'fwlcloseDoubleQuote' 'fwlcloseSingleQuote' 'dwlcjkSingleQuoteRight' 'dwlcjkDoubleQuoteRight' 'dwlparenRight'}