Mercurial > urweb
annotate tests/thead.ur @ 2195:18e6fb487880
Reduce: add reduction in some spots previously missed, associated with 'case' return types
| author | Adam Chlipala <adam@chlipala.net> |
|---|---|
| date | Wed, 25 Nov 2015 18:48:17 -0500 |
| parents | d3a0f2b8af28 |
| children |
| rev | line source |
|---|---|
| adam@2007 | 1 fun main () : transaction page = return <xml><body> |
| adam@2007 | 2 <table> |
| adam@2007 | 3 <thead> |
| adam@2007 | 4 <tr> <th>A</th> <th>B</th> </tr> |
| adam@2007 | 5 </thead> |
| adam@2007 | 6 |
| adam@2007 | 7 <tbody> |
| adam@2007 | 8 <tr> <td>1</td> <td>2</td> </tr> |
| adam@2007 | 9 <tr> <td>3</td> <td>4</td> </tr> |
| adam@2007 | 10 </tbody> |
| adam@2007 | 11 |
| adam@2007 | 12 <tfoot> |
| adam@2007 | 13 <tr> <th>C</th> <th>D</th> </tr> |
| adam@2007 | 14 </tfoot> |
| adam@2007 | 15 </table> |
| adam@2007 | 16 </body></xml> |