pascal.c