Mercurial > urweb
annotate tests/firebug.ur @ 2068:b6adfe99bb08
Check realloc's return code to prevent segfault on out of memory condition (Part 2)
| author | Sergey Mironov <grrwlf@gmail.com> |
|---|---|
| date | Sun, 24 Aug 2014 11:56:41 +0400 |
| parents | 5f72a66402f7 |
| children |
| rev | line source |
|---|---|
| adamc@1088 | 1 fun main () = |
| adamc@1088 | 2 a <- source "some text"; |
| adamc@1088 | 3 return <xml><body> |
| adamc@1088 | 4 <label>A: <ctextbox source={a}/></label> |
| adamc@1088 | 5 </body></xml> |