Pascal compiler