add some pascal snippets