Section courante

A propos

Section administrative du site

 Langage  Elément  Tutoriel  Annexe  Aide 
ABAP/4
Ada
Assembleur
Assembly & bytecode
ASP (Active Server Pages)
Basic
C
C++
C# (C Sharp)
Cobol
ColdFusion
Fortran
HTML
Java
JavaScript
LISP
Logo
LotusScript
Oberon
Pascal
Perl
PHP
PL/1
Prolog
Python
Rebol
REXX
Ruby
Rust
SAS
NoSQL
SQL
Swift
X++ (Axapta)
GNAT
SMALLAda
VHDL
Assembleur 370
Assembleur 1802
Assembleur 4004
Assembleur 6502
Assembleur 6800
Assembleur 68000
Assembleur 8080 et 8085
Assembleur 8089
Assembleur 80x86
Assembleur AGC4
Assembleur ARM
Assembleur DPS 8000
Assembleur i860
Assembleur Itanium
Assembleur MIPS
Assembleur PDP-11
Assembleur PowerPC
Assembleur RISC-V
Assembleur SPARC
Assembleur SuperH
Assembleur UNIVAC I
Assembleur VAX
Assembleur Z80
Assembleur Z8000
Assembleur z/Architecture
ASSEMBLER/MONITOR 64
Micol Assembler
GFA Assembler
A86
MASM (Macro Assembler)
TASM (Turbo Assembler)
CIL
Jasmin
LLVM
MSIL
Parrot
P-Code (PCode)
SWEET16
G-Pascal
ASP 1.0
ASP 2.0
ASP 3.0
ASP.NET
ASP.NET Core
ABasiC (Amiga)
Adam SmartBASIC
Altair BASIC
AmigaBASIC (Amiga)
AMOS Basic (Amiga)
Atari Basic (Atari 400, 600 XL, 800, 800XL)
Basic Apple II (Integer BASIC/APPLESOFT)
Basic Commodore 64 (CBM-BASIC)
Basic Commodore 128 (BASIC 7.0)
Basic Commodore VIC-20 (CBM-BASIC 2.0)
Basic Coco 1 (Color Basic)
Basic Coco 2 (Extended Color Basic)
Basic Coco 3 (Extended Color Basic 2.0)
BASICA (PC DOS)
Basic Pro
BBC BASIC
Blitz BASIC (Amiga)
DarkBASIC
Dartmouth BASIC
GFA-Basic (Atari ST/Amiga)
GWBASIC (MS-DOS)
Liberty BASIC
Locomotive BASIC (Amstrad CPC)
MSX-Basic
Omikron Basic (Atari ST)
Oric Extended Basic
Power Basic
Quick Basic/QBasic (MS-DOS)
Sinclair BASIC (ZX80, ZX81, ZX Spectrum)
ST BASIC (Atari ST)
Turbo Basic
Vintage BASIC
VBScript
Visual Basic (VB)
Visual Basic .NET (VB .NET)
Visual Basic pour DOS
Yabasic
BeckerBASIC
SIMONS' BASIC
Basic09 d'OS-9
Disk Extended Color Basic
Basic09 d'OS-9
Disk Extended Color Basic
Access
Excel
Visual Basic pour Windows
Visual Basic .NET pour Windows
C Shell Unix (csh)
C pour Amiga
C pour Atari ST
C pour DOS
C pour Falcon030
C pour GEMDOS (Atari ST)
C pour Linux
C pour PowerTV OS
C pour OS/2
C pour Unix
C pour Windows
Aztec C
CoCo-C
GNU C
HiSoft C
IBM C/2
Introl-C
Lattice C
Microsoft C
MinGW C
MSX-C
Open Watcom C
OS-9 C Compiler
Pure C
Quick C
Turbo C
HiSoft C for Atari ST
HiSoft C for CP/M (Amstrad CPC)
C++ pour OS/2
C++ pour Windows
Borland C++
C++Builder
IBM VisualAge C++
Intel C++
MinGW C++
Open Watcom C++
Symantec C++
Turbo C++
Visual C++
Visual C++ .NET
Watcom C++
Zortech C++
C# (C Sharp) pour Windows
Apple III Cobol
Microsoft Cobol
BlueDragon
Lucee
OpenBD
Railo
Smith Project
Microsoft Fortran
WATFOR-77
CSS
FBML
Open Graph
SVG
XML
XSL/XSLT
LESS
SASS
GCJ (GNU)
JSP
Jython
Visual J++
Node.js
TypeScript
AutoLISP
ACSLogo
LotusScript pour Windows
Amiga Oberon
Oberon .NET
Apple Pascal
Delphi/Kylix/Lazarus
Free Pascal
GNU Pascal
HighSpeed Pascal
IBM Personal Computer Pascal
Lisa Pascal
Maxon Pascal
MPW Pascal
OS-9 Pascal
OSS Personal Pascal
Pascal-86
Pascal du Cray Research
Pascal/VS
Pascal-XT
PURE Pascal
QuickPascal
RemObjets Chrome
Sun Pascal
THINK Pascal
Tiny Pascal (TRS-80)
Turbo Pascal
UCSD Pascal
VAX Pascal
Virtual Pascal
Turbo Pascal for CP/M-80
Turbo Pascal for DOS
Turbo Pascal for Macintosh
Turbo Pascal for Windows
CodeIgniter (Cadre d'application)
Drupal (Projet)
Joomla! (Projet)
Phalanger (PHP .NET)
phpBB (Projet)
Smarty (balise)
Twig (balise)
Symfony (Cadre d'application)
WordPress (Projet)
Zend (Cadre d'application)
PL360
PL/M-80
PL/M-86
Turbo Prolog
CPython
IronPython
Jython
PyPy
AREXX
Regina REXX
JMP
Btrieve
Cassandra
Clipper
CouchDB
dBASE
Hbase
Hypertable
MongoDB
Redis
Access
BigQuery
DB2
H2
Interbase
MySQL
Oracle
PostgreSQL
SAP HANA
SQL Server
Sybase
U-SQL
Introduction
Les opérateurs
Référence des procédures et des fonctions
Référence des mots réservés
Les premiers pas
Vocabulaire Pascal
Les instructions WITH et VIEWING
Allocation dynamique
Les modules
Vectorisation et optimisation
Référence des codes d'erreurs
Ensemble de caractères
Erreurs non signalées par Cray Pascal
Exemples de programmation d'entrée/sortie
Préface
Notes légal
Dictionnaire
Recherche

Vectorisation et optimisation

Cette section décrit les éléments suivants :

Vectorisation

Le compilateur Pascal convertit certaines boucles FOR en séquences d'opérations vectorielles. Au moment de l'exécution, les boucles FOR vectorisées utilisent les registres vectoriels et les unités fonctionnelles du matériel Cray pour réduire considérablement le temps d'exécution. La vectorisation est activée par l'option de compilation V+, pouvant apparaître sur l'instruction d'appel Pascal ou dans une directive de compilation apparaissant entre les unités de compilation. (La vectorisation est activée par défaut.)

Bien que le compilateur Pascal tente de vectoriser chaque boucle FOR, toutes les boucles FOR ne peuvent pas être vectorisées. Certaines boucles, si elles sont vectorisées, produisent des résultats différents de ceux générés par le code scalaire; d'autres boucles contiennent des opérations ne pouvant pas être effectuées en mode vectoriel. Le compilateur Pascal effectue une analyse détaillée de chaque boucle FOR et ne vectorise pas les boucles pour lesquelles la transformation scalaire en vecteur ne peut pas être garantie en toute sécurité.

Les constructions suivantes inhibent la vectorisation dans une boucle FOR :

Exemple :

  1. VAR
  2.  a:ARRAY[1..n] OF REAL;
  3.  i,n:INTEGER;
  4.  x:REAL;
  5.  p:ARRAY[1..n] OF INTEGER;
  6.  r:ARRAY[1..n] OF RECORD
  7.   f,g:INTEGER;
  8.  END;
  9. BEGIN
  10.  FOR i:=1 TO n DO             (* Ligne 1 *)
  11.   BEGIN                       (* Ligne 2 *)
  12.    a[i]:=100.0;               (* Ligne 3 *)
  13.    IF P[i]=NIL THEN           (* Ligne 4 *)
  14.     r[i].f:=r[1].g            (* Ligne 5 *)
  15.    ELSE                       (* Ligne 6 *)
  16.     r[i].f:=r[i].f*p[i]^      (* Ligne 7 *)
  17.    END;                       (* Ligne 8 *)
  18. END;

Dans l'exemple précédent, les opérandes de la boucle sont classés comme suit :

Ligne Numéro Classe Opérande
1 Contrôle de boucle i
2 Constante 100.0
3 Définition vectorielle a[i]
3 Affectation vectorielle a[i]:=100.0
4 Définition vectorielle P[i]
4 Expression vectorielle P[i]=NIL
4-7 Vecteur IF IF P[i]=NIL THEN
r[i].f:=r[1].g
ELSE
r[i].f:=r[i].f*p[i]^
5 Constante 1
5 Invariante r[1].g
5 Définition vectorielle r[i].f
5 Affectation vectorielle r[i].f:=r[1].g
7 Définition vectorielle p[i]^
7 Définition vectorielle r[i].f
7 Expression vectorielle r[i].f*p[i]^
7 Affectation vectorielle r[i].f:=r[i].f*P[i]^

Les boucles FOR contenant des instructions IF, des indices de valeur de tableau (adressage indirect de tableaux) et un déréférencement de pointeur de valeur de tableau ne vectorisent que si l'attribut CIGS (spécifiant l'index compacté et le regroupement/la dispersion) est présent sur le paramètre CPU de l'instruction d'invocation Pascal, soit explicitement, soit en tant qu'attribut par défaut de la machine cible.

Si la directive VI est présente dans un commentaire avant une instruction FOR, Pascal ignore les indices ambigus et autres dépendances potentielles lors de l'analyse de la boucle.

Les exemples de boucles FOR vectorisables suivant supposent ces déclarations :

  1. CONST
  2.  n=1000;
  3. VAR
  4.  a,b:ARRAY[1..n] OF REAL;
  5.  c:ARRAY[1..10] OF 1..n;
  6.  d:ARRAY[1..n] OF PACKED RECORD
  7.    f:^ARRAY[1..10] OF INTEGER;
  8.    g:I24
  9.  END;
  10.  dot:REAL;
  11. BEGIN

Exemple 1, une boucle FOR vectorisable :

  1.  FOR i:=1 TO n DO BEGIN
  2.   a[i]:=0.0;
  3.   b[i]:=SQR(b[i])+1
  4.  END;

Exemple 2, une boucle FOR décalant les éléments d'un tableau :

  1.  FOR i:=1 TO n-1 DO a[i]:=a[i+1];

Exemple 3, une boucle FOR produisant le produit scalaire de deux vecteurs :

  1.  dot:=0.0;
  2.  FOR i:=1 TO n DO dot:=dot+a[i]*b[i];

Exemple 4, adressage complexe :

  1.  FOR i:=1 TO n DO d[i].f^[1]:=d[i].g;

Exemple 5, indexation indirecte nécessitant du matériel de collecte/diffusion pour la vectorisation :

  1.  FOR i:=1 TO 10 DO a[c[i]]:=b[c[i]];

Exemple 6, division sûre :

  1.  FOR i:=1 TO n DO IF a[i]<>0 THEN a[i]:=1/a[i];

Exemple 7, une instruction IF nécessitant du matériel de collecte/diffusion pour la vectorisation :

  1.  FOR i:=1 TO n DO IF a[i]>b[i] THEN b[i]:=0
  2.                                ELSE a[i]:=b[i];

L'exemple 8, le programme Sieve, est un exemple de programme avec plusieurs boucles vectorisables :

  1. PROGRAM sieve(OUTPUT);
  2.  
  3. CONST
  4.  size=1000000;
  5.  
  6. TYPE
  7.  flagarray=array[2..size] OF BOOLEAN;
  8.  
  9. VAR
  10.  flags:flagarray;
  11.  i,j:integer;
  12.  
  13. BEGIN
  14.  FOR i:=2 TO size DO flags[i]:=TRUE;
  15.  FOR i:=2 TO TRUNC(SQRT(size)) DO IF flags[i] THEN FOR j:=i+i TO size BY i DO flags[j]:=FALSE;
  16.  j:0;
  17.  FOR i:=2 TO size DO j:=j+ORD(flags[i]);
  18.  WRITELN('Fin du tamis Pascal vectorisé ;',j:0,' nombres premiers trouvés.')
  19. END.

Optimisation

Les optimisations de haut niveau sont effectuées avant la génération du code pour un programme Pascal. Les types d'optimisations suivants sont considérés comme des optimisations de haut niveau :

Les optimisations de bas niveau sont effectuées après la génération du code. Les types d'optimisations suivants sont considérés comme des optimisations de bas niveau :

Toutes les optimisations sont contrôlées par l'option de compilateur O. Les optimisations sont activées par O+ et désactivées par O-. Étant donné que les optimisations réduisent le temps d'exécution tout en augmentant le temps de compilation, utilisez O- lors du développement d'un programme et O+ pour les exécutions de production.

L'option de compilateur O peut être suivie d'un numéro pour affiner le planificateur d'instructions; l'option O+ est équivalente à l'option O3. Le nombre détermine le temps que le planificateur utilise pour rechercher la planification optimale des instructions. Le nombre spécifié a un effet direct sur le temps nécessaire à la compilation : les nombres élevés augmentent le temps de compilation et les petits nombres le diminuent.

Bien que les petits nombres réduisent le temps de compilation, la spécification d'un nombre trop petit peut entraîner une mauvaise planification du code. L'effet de la planification des instructions varie d'un programme Pascal à l'autre. Il peut être nécessaire d'expérimenter différentes valeurs numériques dans votre programme pour produire le meilleur compromis entre le temps de compilation et le temps d'exécution.



PARTAGER CETTE PAGE SUR
Dernière mise à jour : Vendredi, le 13 octobre 2017