Voici un tableau de référence des différents procédures et fonctions du «Sun Pascal» avec prototypes :
Nom | Syntaxe | Description |
---|---|---|
ABS | function abs(x:expression numérique):expression numérique; | Cette fonction retourne la valeur absolue d'une expression numérique. |
ADDR | function addr(x:variable):pointer; | Cette fonction retourne le pointeur d'une adresse de variable. |
APPEND | procedure append(varfich:file;FileName:varying of char); | Cette procédure permet d'ouvrir une fichier en mode ajouter. |
ARCTAN | function arctan(r:real):real; | Cette fonction trigonométrique permet de calculer la «ArcTangente» en radians. |
ARGC | function argc:integer; | Cette fonction permet de demander le nombre de paramètres passé au programme. |
ARGV | procedure argv(i:integer;var a:varying of char); | Cette procédure permet de demander, dans une chaine de caractères, le paramètre à la position spécifié. |
ASSERT | procedure assert(expr:boolean) | Cette procédure permet de vérifier une expression booléen à exécuter. |
BOOLEAN | identv1,identv2,...:boolean; identt2,identt2,...=boolean; |
Cette type d'identificateur permet de définir une variable de format Booléen (True ou False). |
CARD | function card(x:set of element):integer; | Cette fonction permet de demander le cardinal d'un ensemble. |
CHAR | identv1,identv2,...:char; identt2,identt2,...=char; |
Ce type d'identificateur permet de définir une variable de format Char (n'importe quel caractère ASCII 0 à 255). |
CHR | function chr(i:integer):char; | Cette fonction permet de retourner le caractère correspondant au code ASCII numérique. |
CLOCK | function clock:integer; | Cette fonction permet de demander le temps utilisateur consommé par ce processus. |
CLOSE | procedure close(fich:file); | Cette procédure permet de fermer un fichier. |
CONCAT | function concat(ch1,ch2, ...:varying of char):varying of char; | Cette fonction permet de juxtaposé différentes de chaîne de caractères et de le retourner comme paramètre. |
COS | function cos(r:real):real; | Cette fonction trigonométrique retourne le «Cosinus». |
DATE | procedure date(a:varying of char); | Cette procédure permet de retourner la date du système d'exploitation. |
DISCARD | procedure discard(expr:fonction); | Cette procédure permet de rejeter explicitement la valeur de retour d'une fonction. |
DISPOSE | procedure dispose(p:pointer); | Cette procédure permet de libérer une partie de la mémoire préalablement alloué par la procédure New. |
DOUBLE | identv1, identv2,...:double; identt1, identt2,...=double; |
Ce type d'identificateur permet de définir une variable réel de format Double. |
EOF | function eof(f:file):boolean; | Cette fonction indique si la fin du fichier est atteinte. |
EOLN | function eoln(fich:text):boolean; | Cette fonction indique si la fin d'une ligne de fichier texte est atteinte. |
EXIT | exit; | Cette procédure permet de quitter la boucle «FOR», «WHILE» ou «REPEAT» à l'instruction immédiatement après la boucle. |
EXP | function exp(r:real):real; | Cette fonction retourne la valeur exponentielle. |
EXPO | function expo(r:real):integer; | Cette fonction retourne la valeur exponentielle entière d'un nombre réel. |
FIRSTOF | function firstof(x:variable):ordinal; |
Cette fonction permet de demander la première valeur possible d'un type ou d'une variable. |
FLUSH | procedure flush(fich:file); | Cette procédure permet de vider les tampons d'écriture du fichier spécifié. |
GETENV | procedure getenv(varenv:varying of char;var value:varying of char); | Cette procédure permet de connaitre la valeur d'une variable d'environnement du système d'exploitation à partir de son nom en utilisant des chaînes de caractères. |
GETFILE | function getfile(f:file):univ_ptr; function getfile(f:text):univ_ptr; |
Cette fonction permet de demander un pointeur vers un descripteur d'entrée/sortie standard de langage de programmation C associé avec un fichier de langage de programmation Sun Pascal. |
HALT | procedure halt; | Cette fonction permet d'arrêter le programme ou le sous-programme actuellement en cours. |
INDEX | function index(const target_string, pattern_string: varying of Char):integer; | Cette fonction permet de demander la position du première occurrence d'une sous-chaîne de caractères dans une chaîne de caractères. |
INTEGER | identv1,identv2,...:integer; identt1,identt2,...=integer; |
Ce type d'identificateur permet de définir une variable entière de format Integer. |
IN_RANGE | function in_range(x:integer):boolean; function in_range(x:boolean):boolean; function in_range(x:char):boolean; function in_range(x:enumération):Boolean; |
Cette fonction permet de demander si une valeur est dans l'intervalle d'entier définie. |
LASTOF | function lastof(x:variable):ordinal; | Cette fonction permet de demander la dernière valeur possible d'un type ou d'une variable. |
LENGTH | function length(ch:varying of char):integer; | Cette fonction permet d'indiquer la longueur d'une chaîne de caractères. |
LINELIMIT | procedure linelimit(filefile;n:integer); procedure linelimit(filetext;n:integer); |
Cette procédure permet de terminer l'exécution du programme après que le numéro de ligne spécifié est été écrit dans un fichier texte. |
LN | function ln(r:real):real; | Cette fonction permet de calculer le logarithme népérien (Naturel). |
MAX | function max(exp1,exp2:valeur scalaire):valeur scalaire; | Cette fonction permet de demander la plus grande valeur entre deux expressions spécifiés. |
MESSAGE | procedure message(x1,...xN); | Cette procédure permet d'écrire les informations spécifié sur la sortie d'erreur standard (stderr). |
MIN | function min(exp1,exp2:valeur scalaire):valeur scalaire; | Cette fonction permet de demander la plus petite valeur entre deux expressions spécifiés. |
NEW | procedure new(p:pointer); | Cette fonction permet d'allouer de la mémoire dynamique pour une variable. |
NEXT | procedure next; | Cette procédure permet de passer à l'itération suivante de la boucle «FOR», «WHILE» ou «REPEAT». |
ODD | function odd(i:integer):boolean; | Cette fonction indique si la valeur entière est un nombre impaire. |
OPEN | procedure open(file:file;pathname:string; history:string; error:integer32;buffer:integer); procedure open(file:text;pathname:string; history:string; error:integer32;buffer:integer); | Cette fonction permet d'associer un fichier externe avec une variable de fichier. |
ORD | function ord(s):integer; | Cette fonction permet de connaitre le rang de la valeur scalaire, par exemple on peut connaître le numéro de code ASCII d'un caractère de cette manière. |
PCEXIT | procedure pcexit(x:integer); | Cette procédure permet de terminer le programme et de retourner le code de sortie spécifié. |
RANDOM | function random(max:integer):real; | Cette fonction permet de générer un nombre aléatoire entre 0,0 et 1,0. |
READ | procedure read([var fich:text;]var1, var2,...); | Cette procédure permet de lire différentes données à partir d'une périphérique, d'un fichier ou de la console. |
READLN | procedure readln([var fich:text;]var1,var2,...); | Cette procédure permet de lire une ligne de texte à partir d'une périphérique, d'un fichier ou de la console. |
REAL | identv1,identv2,...:real; identt1,identt2,...=real; |
Ce type d'identificateur permet de définir une variable réel de format Real. |
REMOVE | procedure remove(fichier:file); procedure remove(fichier:text); |
Cette fonction permet d'enlever le fichier spécifié. |
RESET | procedure reset(var fich:file); | Cette procédure permet d'ouvrir un fichier à partir de la variable fichier spécifié. |
REWRITE | procedure rewrite(var fich:file); | Cette procédure permet de créer un nouveau fichier ou d'écraser le contenu d'un fichier existant. |
ROUND | function round(r:real):integer; | Cette fonction retourne la valeur arrondie d'un nombre réel. |
SEED | function seed(i:integer):integer; | Cette fonction permet de réinitialiser le générateur de nombre aléatoire. |
SEEK | procedure seek(var fich:file; nbre:integer); | Cette procédure permet de fixer la position du pointeur dans un fichier spécifier. |
SIN | function sin(r:real):real; | Cette fonction trigonométrique retourne le «Sinus». |
SINGLE | identv1,identv2,...:single; identt1,identt2,...=single; |
Ce type d'identificateur permet de définir une variable entière de format Single. |
SQR | function sqr(x:type numérique):type du paramètre; | Cette fonction retourne le carré d'un nombre. |
SQRT | function sqrt(r:real):real; | Cette fonction retourne la racine carré d'un nombre. |
STLIMIT | procedure stlimit(x:integer); | Cette procédure permet de terminer le programme si le nombre d'instructions spécifiés pendant l'exécution d'une boucle. |
SUBSTR | function substr(str:varying of char;p,n:integer):integer; | Cette fonction permet d'extraire une sous-chaîne de caractères contenu dans une chaîne de caractères. |
SYSCLOCK | function sysclock:integer; | Cette fonction permet de demander l'heure système consommé par ce processus. |
TEXT | type nomtyp=text; var nomvar=text; |
Ce type d'identificateur permet de définir une variable de fichier de format Text. |
TIME | function time(var a:array[1..10] of char):array[1..10] of char; function time(var a:varying of Char):array[1..10] of char; |
Cette fonction permet de demander l'heure courante. |
TRIM | function trim(str:varying of char):varying of char; | Cette fonction permet d'enlever les espaces au début et à la fin d'une chaîne de caractères. |
TRUNC | function trunc(r:real):integer; | Cette fonction retourne la partie entière d'un nombre réel. |
WALLCLOCK | function wallclock:integer; | Cette fonction permet de demander le nombre de secondes écoulés depuis le 1er janvier 1970 à 00:00:00 heure de Greenwish. |
WRITE | procedure write([var fich:file,]var1,var2,...); | Cette procédure permet d'écrire différentes données sur une périphérique, dans un fichier ou sur la console. |
WRITELN | procedure writeln([var fich:file,]var1,var2,...); | Cette procédure permet d'écrire différentes données avec un saut de ligne sur une périphérique, dans un fichier ou sur la console. |
Remarque
- ATTENTION ! Tous les mots réservés et tous les procédures et fonctions prédéfinit du Sun Pascal doivent être en minuscules. Si vous mettez des majuscules, ils ne seront pas reconnu.