| Pascal Programming Language |
Article Index for Pascal |
Website Links For Pascal |
Information AboutPascal Programming Language |
| CATEGORIES ABOUT PASCAL PROGRAMMING LANGUAGE | |
| programming languages | |
| algol programming language family | |
| imperative programming languages | |
| pascal | |
| procedural programming languages | |
| statically-typed programming languages | |
| structured programming languages | |
HISTORY Pascal is based on the ALGOL programming language and named in honor of mathematician and philosopher Blaise Pascal . Wirth also developed Modula-2 and Oberon , languages similar to Pascal. Oberon also supports Object-oriented Programming . Initially, Pascal was a language intended to teach students structured programming, and generations of students have "cut their teeth" on Pascal as an introductory language in undergraduate courses. Variants of Pascal are still widely used today, for example Free Pascal can be used in both 32 and 64 bit formats, and all types of Pascal programs can be used for both education and software development. Parts of the original Macintosh operating system were written in Pascal and Motorola 68000 Assembly Language (though later versions incorporated substantial amounts of C++ as well), and the most frequent high-level language used for development in the early Mac community was Pascal. In addition, the popular Typesetting system TeX was written by Donald E. Knuth in WEB , a variant of Pascal designed for Literate Programming . Implementations The first Pascal compiler was designed in Zurich for the CDC 6000 computer family, and it became operational in 1970 . The first successful port of the CDC Pascal compiler to another mainframe was completed by Welsh and Quinn at the Queen's University Of Belfast in 1972 . The target was the ICL 1900 computer. The first Pascal Compiler written in North America was constructed at the University Of Illinois under Donald B. Gillies for the PDP-11 and generated native machine code. In order to rapidly propagate the language, a compiler "porting kit" was created in Zurich that included a compiler for a "virtual" machine code (or more properly an intermediate code), and a simulator for that same code. This became the P-system. Although this system was intended to enable true machine code Compiler s to be created, at least one system, the notable UCSD implementation, utilized it to create an Interpretive system UCSD P-System . The P-system compilers were termed P1-P4, with P1 being the first version, and P4 being the last. Watcom Pascal was developed for the IBM mainframe in the early 1980s. IP Pascal was an implementation of the Pascal programming language using Micropolis DOS, but was moved rapidly to CP/M running on the Z80 . In the early 1980s , UCSD Pascal was ported to the Apple II and Apple III computers to provide a structured alternative to the BASIC interpreters that came with the machines. In the 1980s Anders Hejlsberg wrote the Blue Label Pascal compiler for the Nascom-2 . A reimplementation of this compiler for the IBM PC was marketed under the names Compas Pascal and PolyPascal before it was acquired by Borland . Renamed to '' Turbo Pascal '' it became hugely popular, thanks in part to an aggressive pricing strategy in part to having one of the first full-screen Integrated Development Environment s. The inexpensive Borland compiler had a large influence on the Pascal community that began concentrating mainly on the IBM PC in the late 1980s. Many PC hobbyists in search of a structured replacement for BASIC used this product. Super Pascal was a variant which added non-numeric labels, a return statement and expressions as names of types. With Turbo Pascal version 5.5 Borland added Object Orientation to Pascal. Around the same time a number of concepts were imported from C in order to let Pascal programmers use the C-based API of Microsoft Windows directly. These extensions included null-terminated String s, Pointer Arithmetic , Function Pointer s, an address-of operator and unsafe Typecasts . However, Borland later decided it wanted more elaborate object-oriented features, and started over in Delphi using the ''. Turbo Pascal , and other derivatives with units or module concepts are Modular Languages . However, it does not provide a nested module concept or qualified import and export of specific symbols. The universities of Zurich , Karlsruhe and Wuppertal have developed an ''EXtension for '''S'''cientific '''C'''omputing'' (Pascal XSC) based on Oberon, which provides a free solution for programming numerical computations with controlled precision. SYNTAX Pascal, in its original form, is a purely Procedural Language with the standard array of if, while, for, and related constructs.Hello world All Pascal programs start with the "Program" Keyword , an optional list of external file descriptors and then a Block of code is indicated with the " Begin" and "End" keywords. Semicolon s separate statements, and the Full Stop ends the program (or unit). Letter Case is ignored in Pascal source.program HelloWorld(output); begin writeln('Hello, World!') end. Data structures Pascal has integer, character and boolean as the simple types, plus enumerations, a new type introduced with Pascal. program myprog; var a: integer; b: char; c: boolean; d: (one, two, three, four, five); A "subrange" of any of the above types can be made. var x: 1..10; y: 'a'..'z'; z: two..four; Types can be built from other types by the type declaration. program myotherprog; type x = integer; y = x; ... Further, complex types can be constructed from simple types: type a = array {Link without Title} of integer; b = record a: integer; b: char end; c = file of a; Strings are packed arrays that start with an integer index of 1. Pointers Pascal supports the use of Pointer s: type a = ^b; b = record a: integer; b: char; c: a end; var pb: a Here the variable ''pb'' is a pointer to the data type ''b'', a record. To create a new record and assign the values ''10'' and ''A'' to the fields ''a'' and ''b'' in the record, the commands would be; new(pb); pb^.a := 10; pb^.b := 'A'; pb^.c := nil; ... Linked List s can be created by including a pointer type field (c) in the record (see also Nil and Null (computer) ). Control structures Pascal is a Structured Programming language, meaning that the flow of control is structured into standard statements, ideally without ' Go To ' commands. while a <> b '''do''' writeln('Waiting'); if a > b '''then''' writeln('Condition met') else writeln('Condition false'); for i := 1 '''to''' 10 '''do''' writeln('Iteration: ', i:1); repeat a := a + 1 '''until''' a = 10; Procedures and functions Pascal structures programs into procedures and functions. program mine(output); var i : integer; procedure print('''var''' j: integer); function next(k: integer): integer; begin next := k + 1 end; begin writeln('The total is: ', j); j := next(j) end; begin i := 1; while i <= 10 '''do''' print(i) end. Procedures and functions can nest to any depth, and the 'program' construct is the logical outermost block. Each block can have its own declarations of goto labels, constants, types, variables, and other procedures and functions, which must all be in that order. This ordering requirement was originally intended to allow efficient single-pass compilation. However, in most modern dialects the strict ordering requirement of declaration sections has been abandoned. RESOURCES Compilers Several Pascal compilers are available for the use of general public:
A very extensive list can be found on Pascaland . The site is in French, but it is basically a list with URLs to compilers, so that does not matter. You may also check out Pascal Central , a Mac centric Pascal info and advocacy site with a rich collection of article archives, plus links to many compilers and tutorials. STANDARDS In 1983, the language was standardized, in the international standard ISO/IEC 7185, as well as several local country specific standards, including the American ANSI/IEEE770X3.97-1983. In 1990, an extended Pascal standard was created as ISO/IEC 10206. The ISO 7185 was stated to be a clarification of Wirth's 1974 language as detailed by the User Manual and Report and Wirth , but was also notable for adding "Conformant Array Parameters" as a level 1 to the standard, level 0 being Pascal without Conformant Arrays. Note that Niklaus Wirth himself referred to the 1974 language as "the Standard", for example, to differentiate it from the machine specific features of the CDC 6000 compiler. On the large machines (mainframes and minicomputers) Pascal originated on, the standards were generally followed. On the IBM-PC, they were not. On IBM-PCs, the Borland standards Turbo Pascal and Delphi have the greatest number of users. Thus, it is typically important to understand whether a particular implementation corresponds to the original Pascal language, or a Borland dialect of it. Divisions Niklaus Wirth's Zurich version of Pascal was issued outside of ETH in two basic forms, the CDC 6000 compiler source, and a porting kit called Pascal-P system. The Pascal-P compiler left several features of the full language out. For example, procedures and functions as parameters, undiscriminated variant records, packing, dispose, interprocedural gotos and other features of the full compiler were left off. UCSD Pascal , under professor Kenneth Bowles, used the Pascal-P2 kit, and consequentially had several of the same differences with the full Zurich Pascal compiler as the Pascal-P compiler did. UCSD Pascal later was adopted as Apple Pascal, and continued through several versions there. Borland's Turbo Pascal , written by Anders Hejlsberg was written in assembly language independent of UCSD or the Zurich compilers. However, it adopted much of the same subset as the UCSD compiler, probably because at that time, UCSD was the most common Pascal system running on Microprocessors. CRITICISM While very popular (although more so in the 1980s and early 1990s than now), early versions of Pascal have been widely criticised for being unsuitable for "serious" use outside of teaching. and Macintosh , heavily depended on Pascal (to the point where the C interface for the Mac OS API had to deal in Pascal data types). In the decades since then, Pascal has continued to evolve and most of Kernighan's points do not apply to current implementations. Unfortunately, just as Kernighan predicted in his article, most of the extensions to fix these issues were incompatible from compiler to compiler. In the last decade, however, the varieties seem to have condensed into two categories, ISO or Borland like, a better eventual outcome than Kernighan foresaw. Based on his experience with Pascal and Oberon . Although these languages are an improvement upon Pascal, they have yet to meet with the same commercial success. SEE ALSO
EXTERNAL LINKS Reference material Tutorials Books
Journals
Resources
Standards
History
Criticism
Humor
|
|
|