Implemented syntax highlighting on min site.
h3rald h3rald@h3rald.com
Fri, 24 Nov 2023 14:39:13 +0100
4 files changed,
9 insertions(+),
16 deletions(-)
M
site/assets/styles/min-lang.css
→
site/assets/styles/min-lang.css
@@ -287,7 +287,7 @@ .min-tkLineComment,
.min-tkLineDocComment, .min-tkBlockComment, .min-tkBlockDocComment { - color: #04873f; + color: #22ad61; } .min-tkBraceRi,@@ -296,7 +296,7 @@ .min-tkSqBracketRi,
.min-tkBraceLe, .min-tkBracketLe, .min-tkSqBracketLe { - color: #9c080f; + color: #cf111b; } .min-tkInt,@@ -313,7 +313,7 @@ color: #c7830e;
} .min-tkSymbol { - color: #9de9fa; + color: #f5fcfd; } .min-tkNull,
M
site/contents/reference-xml.md
→
site/contents/reference-xml.md
@@ -17,7 +17,7 @@ > > returns the following:
> > > > { > > {"https://min-lang.org" :href} :attributes -> > ({"min web site" :text ;xml-text}) :children +> > ({"min web site" :text}) :children > > "a" :tag > > ;xml-element > > }@@ -56,7 +56,7 @@ > > Returns the following:
> > > > { > > {"test" :class} :attributes -> > ({"first" :text ;xml-text}) :children +> > ({"first" :text}) :children > > "li" :tag > > ;xml-element > > }@@ -80,13 +80,13 @@ > > Returns the following:
> > > > ({ > > {"test" :class} :attributes -> > ({"first" :text ;xml-text}) :children +> > ({"first" :text}) :children > > "li" :tag > > ;xml-element > > } > > { > > {"test" :class} :attributes -> > ({"third" :text ;xml-text}) :children +> > ({"third" :text}) :children > > "li" :tag > > ;xml-element > > })
M
site/contents/reference.md
→
site/contents/reference.md
@@ -179,7 +179,7 @@ : A dictionary representing an XML or HTML element, exposed by the {#link-module||xml#}
{ {"https://min-lang.org" :href} :attributes - ({"min web site" :text ;xml-text}) :children + ({"min web site" :text}) :children "a" :tag ;xml-element }
M
site/rules.min
→
site/rules.min
@@ -26,14 +26,7 @@ (
symbol span (str :class str :value ==> str :result) ( - "min-$#" (class) =% @class - {} :attributes - attributes class %class @attributes - "span" xelement :sp - sp attributes %attributes @sp - value xtext puts :text - sp (text) => %children @sp - sp to-xml @result + "<span class=\"min-$#\">$#</span>" (class value) =% @result ) ) ::