1 files changed, 140 insertions, 0 deletions
diff --git a/tex/context/interface/mkiv/i-comment.xml b/tex/context/interface/mkiv/i-comment.xml
new file mode 100644
index 000000000..52d54398b
--- /dev/null
+++ b/tex/context/interface/mkiv/i-comment.xml
@@ -0,0 +1,140 @@
+<?xml version="1.0" encoding="UTF-8"?>
+
+<?context-directive job ctxfile x-setups.ctx ?>
+
+<cd:interface xmlns:cd="http://www.pragma-ade.com/commands">
+
+    <cd:command name="definecomment" file="scrn-wid.mkvi">
+        <cd:arguments>
+            <cd:resolve name="keyword-name"/>
+            <cd:resolve name="keyword-name-optional"/>
+            <cd:assignments list="yes" optional="yes">
+                <cd:inherit name="setupcomment"/>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="setupcomment" file="scrn-wid.mkvi">
+        <cd:arguments>
+            <cd:resolve name="keyword-name-list-optional"/>
+            <cd:assignments list="yes">
+                <cd:parameter name="state">
+                    <cd:constant type="start" default="yes"/>
+                    <cd:constant type="stop"/>
+                    <cd:constant type="none"/>
+                </cd:parameter>
+                <cd:parameter name="method">
+                    <cd:constant type="normal" default="yes"/>
+                    <cd:constant type="hidden"/>
+                </cd:parameter>
+                <cd:parameter name="symbol">
+                    <cd:constant type="Comment"/>
+                    <cd:constant type="Help"/>
+                    <cd:constant type="Insert"/>
+                    <cd:constant type="Key"/>
+                    <cd:constant type="Newparagraph"/>
+                    <cd:constant type="Note"/>
+                    <cd:constant type="Paragraph"/>
+                    <cd:constant type="Default"/>
+                </cd:parameter>
+                <cd:parameter name="width">
+                    <cd:constant type="fit"/>
+                    <cd:constant type="cd:dimension"/>
+                </cd:parameter>
+                <cd:parameter name="height">
+                    <cd:constant type="fit"/>
+                    <cd:constant type="cd:dimension"/>
+                </cd:parameter>
+                <cd:parameter name="depth">
+                    <cd:constant type="fit"/>
+                    <cd:constant type="cd:dimension"/>
+                </cd:parameter>
+                <cd:parameter name="title">
+                    <cd:constant type="cd:text"/>
+                </cd:parameter>
+                <cd:parameter name="subtitle">
+                    <cd:constant type="cd:text"/>
+                </cd:parameter>
+                <cd:parameter name="author">
+                    <cd:constant type="cd:text"/>
+                </cd:parameter>
+                <cd:parameter name="nx">
+                    <cd:constant type="cd:number"/>
+                </cd:parameter>
+                <cd:parameter name="ny">
+                    <cd:constant type="cd:number"/>
+                </cd:parameter>
+                <cd:parameter name="color">
+                    <cd:constant type="cd:color"/>
+                </cd:parameter>
+                <cd:parameter name="option">
+                    <cd:constant type="xml"/>
+                    <cd:constant type="max"/>
+                </cd:parameter>
+                <cd:parameter name="textlayer">
+                    <cd:constant type="cd:name"/>
+                </cd:parameter>
+                <cd:parameter name="location">
+                    <cd:constant type="leftedge"/>
+                    <cd:constant type="rightedge"/>
+                    <cd:constant type="inmargin"/>
+                    <cd:constant type="leftmargin"/>
+                    <cd:constant type="rightmargin"/>
+                    <cd:constant type="text"/>
+                    <cd:constant type="high" default="yes"/>
+                    <cd:constant type="none"/>
+                </cd:parameter>
+                <cd:parameter name="distance">
+                    <cd:constant type="cd:dimension"/>
+                </cd:parameter>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="comment" generated="yes" variant="generated" file="scrn-wid.mkvi">
+        <cd:sequence>
+            <cd:variable value="comment"/>
+        </cd:sequence>
+        <cd:arguments>
+            <cd:resolve name="keyword-text-optional"/>
+            <cd:assignments list="yes" optional="yes">
+                <cd:inherit name="setupcomment"/>
+            </cd:assignments>
+            <cd:resolve name="argument-text"/>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="comment" type="environment" generated="yes" variant="generated" file="scrn-wid.mkvi">
+        <cd:sequence>
+            <cd:variable value="comment"/>
+        </cd:sequence>
+        <cd:arguments>
+            <cd:resolve name="keyword-text-optional"/>
+            <cd:assignments list="yes" optional="yes">
+                <cd:inherit name="setupcomment"/>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="placecomments" file="scrn-wid.mkvi"/>
+
+    <cd:command name="comment" file="scrn-wid.mkvi">
+        <cd:arguments>
+            <cd:resolve name="keyword-text-optional"/>
+            <cd:assignments list="yes" optional="yes">
+                <cd:inherit name="setupcomment"/>
+            </cd:assignments>
+            <cd:resolve name="argument-text"/>
+        </cd:arguments>
+    </cd:command>
+
+    <cd:command name="comment" type="environment" file="scrn-wid.mkvi">
+        <cd:arguments>
+            <cd:resolve name="keyword-text-optional"/>
+            <cd:assignments list="yes" optional="yes">
+                <cd:inherit name="setupcomment"/>
+            </cd:assignments>
+        </cd:arguments>
+    </cd:command>
+
+</cd:interface>