Tests that cx:railroad returns the right properties.
Test rr-002.xml is expected to pass.
<p:declare-step xmlns:cx="http://xmlcalabash.com/ns/extensions" xmlns:p="http://www.w3.org/ns/xproc" name="main" version="3.0">
<p:import href="https://xmlcalabash.com/ext/library/railroad.xpl"/>
<p:output port="result" sequence="true"/>
<cx:railroad>
<p:with-input>
<p:inline content-type="text/plain">
S ::= a b
</p:inline>
</p:with-input>
</cx:railroad>
<p:identity>
<p:with-input select="p:document-properties(.)"/>
</p:identity>
<p:cast-content-type content-type="application/xml"/>
</p:declare-step>
<s:schema xmlns:s="http://purl.oclc.org/dsdl/schematron" queryBinding="xslt2">
<s:ns prefix="svg" uri="http://www.w3.org/2000/svg"/>
<s:ns prefix="fn" uri="http://www.w3.org/2005/xpath-functions"/>
<s:pattern>
<s:rule context="/">
<s:assert test="fn:map">Result isn’t a map.</s:assert>
</s:rule>
</s:pattern>
<s:pattern>
<s:rule context="/fn:map">
<s:assert test="fn:string[@key='cx:ebnf']">No EBNF property.</s:assert>
<s:assert test="fn:string[@key='cx:nonterminal'] = 'S'">No nonterminal property.</s:assert>
</s:rule>
</s:pattern>
</s:schema>
Created test.