procedure f(c:CString);external name'system';begin f('dd<`dd`')end.