[r2003-05-30 11:54:10 by cvscast] Empty log message

Original author: cvscast
Date: 2003-05-30 11:55:53+00:00

tests/xsltmark/xslbench2.cd

@@ -32,22 +32,22 @@ let fun xslbench4 (Play -> Xhtml)
                   <h2>("Parts - "@t)
                  !(transform r with
  			  <PERSONA> p -> [<p>[<b>[<i>p]]]
-			| <PGROUP> x -> transform r with
+			| <PGROUP> x -> transform x with
  			      <PERSONA> p -> [<p>[<b>[<i>p]]])
 		]
          | <ACT>[<TITLE> t; rest] -> 
 		[
                   <h3>t
                  !(transform rest with
- 		    <SCENE>[<TITLE> t (r::Speech|_)+] -> 
+ 		    <SCENE>[<TITLE> t (spches::Speech|_)+] -> 
 			[<h3>t 
-			 !(transform r with
+			 !(transform spches with
 			     <SPEECH>[<SPEAKER>s (lines::<LINE>_|_)*] -> 
                                     [<p>[<b> s 
 					 <br>[] 
                                          !transform lines with 
-                                            <LINE>[(l::Char |_ )+] -> 
-                          	                     [!l <br>[]]]
+                                            <LINE>[(str::Char |_ )+] -> 
+                          	                     [!str <br>[]]]
 				    ]
 			  )
 			]