2 # Architectural Form: test ArcBridA:
3 # Resolving IDREFs (series: af-12 - af-15)
4 # test onsgmls and osgmlnorm
7 LC_ALL=C; export LC_ALL
10 trap 'rm -fr $tmpfiles' 1 2 3 15
12 tmpfiles="$tmpfiles af-12.sgml af-12.dtd af-meta-12.dtd"
14 <!DOCTYPE doc SYSTEM "af-12.dtd">
21 <i r="n2">note on verse 2</i>
26 <!NOTATION SGML PUBLIC "-//ISO 8879:1986//NOTATION Standard Generalized Markup
29 <?IS10744 ArcBase open>
30 <!NOTATION open PUBLIC "-//OpenJade Project//NOTATION AFDR ARCBASE open Architecture//EN">
31 <!ATTLIST #NOTATION open
32 ArcDTD CDATA #FIXED "opendtd">
33 <!ENTITY opendtd SYSTEM "af-meta-12.dtd" CDATA SGML>
35 <!ELEMENT doc - o (s+,n)>
37 open NMTOKEN #FIXED "open">
40 open NMTOKEN #FIXED "stanza">
41 <!ELEMENT v - o (#PCDATA)>
44 open NMTOKEN #FIXED "verse">
47 open NMTOKEN #FIXED "notes">
48 <!ELEMENT i - o (#PCDATA)>
53 cat <<EOF >af-meta-12.dtd
54 <!ELEMENT open - o (stanza+,notes)>
55 <!ELEMENT stanza - o (verse+)>
56 <!ELEMENT verse - o (#PCDATA)>
59 <!ELEMENT notes - o (i+)>
60 <!ELEMENT i - o (#PCDATA)>
65 tmpfiles="$tmpfiles af-12-onsgmls.out"
68 ${ONSGMLS} >af-12-onsgmls.out -A open af-12.sgml
69 tmpfiles="$tmpfiles af-12-onsgmls.ok"
70 cat <<EOF >af-12-onsgmls.ok
93 ${DIFF} af-12-onsgmls.ok af-12-onsgmls.out
95 test $result = 0 || { rm -fr $tmpfiles; exit 1; }
97 tmpfiles="$tmpfiles af-12-norm.out"
98 : ${OSGMLNORM=osgmlnorm}
99 ${OSGMLNORM} >af-12-norm.out -A open af-12.sgml
100 tmpfiles="$tmpfiles af-12-norm.ok"
102 cat <<EOF >af-12-norm.ok
105 <VERSE N="N1">verse 1</VERSE>
106 <VERSE N="N2">verse 2</VERSE>
109 <I R="N2">note on verse 2</I>
114 ${DIFF} af-12-norm.ok af-12-norm.out
116 test $result = 0 || result=$(($result + 1))