adamc@135: val snippet = fn s => adamc@135:

{cdata s}

adamc@135: adamc@135: adamc@135: val main = fn () => adamc@135: {snippet "