My Pascal compiler