Introduction

Le langage de programmation Pascal par Cray Research est un langage de programmation Pascal développé par Cray Reseach pour ses super-ordinateur Cray-1, Cray-2, Cray X-MP et Cray Y-MP et principalement disponible sous le système d'exploitation COS ou UNICOS de Cray Research. Le Pascal par Cray Research, aussi appelé Cray Pascal, est conforme aux exigences de niveau 1 de la norme ISO / DIS 7185, définies par l'Organisation internationale de normalisation (ISO) avec trois restrictions.

Extensions

Les extensions CRI de la norme ISO Pascal de niveau 1 sont les suivantes :

• Le ALFA est un type prédéfini spécifié en tant que tableau de caractères à huit membres.
• Les fonctionnalités de traitement des tableaux permettent des opérations sur des tableaux d'entiers comme suit : Expressions de tableau, fusionne de tableau, des opérateurs relationnels de tableau, un accès aux champs et pointeurs valorisés par tableau et des spécifications d'index de tranche.
• La clause BY vous permet de spécifier un index d'incrémentation avec des boucles FOR.
• Les déclarations CACHE permettent de définir des blocs communs résidant dans la mémoire locale.
• Les déclarations COMMON permettent aux blocs communs FORTRAN de partager des données entre les unités de compilation.
• Les expressions conditionnelles peuvent être utilisées sur le côté droit d'une instruction d'affectation.
• Les déclarations constantes permettent des expressions constantes.
• Le $DEBUG est une constante prédéfinie.
• Les directives de procédure et de fonction EXTERNAL et FORTRAN permettent d'utiliser des routines en dehors d'un programme.
• Le I24 est un type de données entier 24 bits prédéfini.
• Le I32 est un type de données entier 32 bits prédéfini.
• Les mots réservés IMPORTED et EXPORTED de procédures permettent d'utiliser des modules précédemment compilés et des sous-programmes FORTRAN ou CAL (Cray assembly language).
• Les déclarations IMPORTED et EXPORTED permettent le partage des variables entre les unités de compilation.
• Les unités de compilation MODULE vous permettent de définir des procédures, fonctions et données Pascal sans module PROGRAM.
• Les entiers peuvent être exprimés en notation octale.
• L'étiquette OTHERWISE spécifie l'action à entreprendre lorsqu'aucune autre étiquette dans une instruction CASE n'est sélectionnée.
• Les identificateurs peuvent inclure des caractères spéciaux («$», «%», «@», «_»).
• Les déclarations STATIC permettent à une variable locale de conserver sa valeur entre les appels à une routine.
• Les déclarations TASKVAR permettent de spécifier des blocs TASK COMMON.
• La liste des procédures et des fonctions prédéfinies est étendue pour inclure les éléments suivants : ARCSIN et ARCCOS calculent l'inverse du sinus et du cosinus, BAND, BOR, BXOR et BNOT sont des fonctions booléennes de chaîne de bits acceptant des paramètres entiers et renvoient des entiers, CONNECT associe un ensemble de données local COS ou un fichier UNICOS à un fichier Pascal, HALT met fin à l'exécution d'un programme lorsqu'il est rencontré, LOG calcule les logarithmes communs, les fonctions de réduction (ANY, ALL, MAXVAL, MINVAL, PRODUCT et SUM) réduisent les expressions de tableau en valeurs simples, LSHIFT et RSHIFT décalent un paramètre entier vers la gauche ou la droite d'un nombre spécifié de places, SINH, COSH et TANH sont les fonctions hyperboliques, SIZEOF donne la taille d'une variable dynamique et TAN calcule une tangente.
• Les définitions VALUE initialisent les variables au moment de la compilation.
• L'instruction VIEWING permet à une variable d'être utilisée pour voir différents types.

Restrictions

Le Cray Pascal inclut les restrictions suivantes à la norme ISO Pascal de niveau 1 :

• Le signe commercial ou arobas (@) ne peut pas être utilisé comme caractère de substitution pour le circonflexe (^), comme spécifié par la norme. Le @ est mise en oeuvre comme un caractère valide dans un identifiant.
• La longueur de ligne maximale pour un fichier texte est de 140 caractères. La norme ne limite pas la longueur de ligne d'un fichier texte.
• Certaines erreurs spécifiées par la norme ne sont pas détectées.