Pascal 4.0 User’s Guide
Trademarks
Contents
Pascal Compiler
Contents
Pic, -Kpicand -PIC, -KPIC
Contents Vii
Viii
Program Construction and Management
Separate Compilation
C++-Pascal Interface
Error Diagnostics
Xii
XView Toolkit
Math Libraries
Contents Xiii
Xiv
Figures
Pascal 4.0 User’s Guide
Fortran
Tables
Xviii
Installation
Preface
Operating Environment
Organization
Audience
AaBbCc123
Conventions Used in This Guide
Shell Prompts in Command Examples
Related Documentation
Manual
Hostname% imagetool floating-point.ps
Readme Files
Other Related Documentation
Documents in Hard Copy and in AnswerBook
CD-ROM
Standards
Introduction
Features
Pascal Compiler
Compatibility
Native Language Support
Text Editors
Debuggers
XView Toolkit
Internationalization
Locale
Licensing
Pascal 4.0 User’s Guide
Simple Pascal Program
Pascal Programs
Compiling the Program
Hostname% pc -o temp temp.p
Running the Program
Renaming the Executable File
Hostname% mv a.out temp
An Interactive Pascal Program
Goodbye, I must go now
Redirecting I/O
Hostname% pc -o copy copy.p
Hello, are you listening?
Using a File Name as a File Variable
Where Did My Program Fail?
Using Pascal Traceback
Hostname% pc -o copy2 copy2.p
Compiling and Running the Program
Using a Sample Program with Segmentation Violation
Hostname% more a.out.trace
Using the -gOption
Try compiling SegViol.p with -g
Pc Version Number
Pascal Compiler
Hostname% mcs -p a.out grep Pascal
Compile and Link Sequence
Optimizer
Language Preprocessor
Source
Compiler Preprocessor cpp or cppas
Suffix Description
File Name Extensions Accepted By pc
Hostname% pc -o rmc rmc.p
Option-Passing on the Command-Line
Option-Passing in the Program Text
Hostname% pc -l rmc.p
Option Description
Hostname% pc options.p
Options
Bbinding
Bsdmalloc
Cond
Calign
Cg89
Cg92
Dname=def
Config
Dalign
Dryrun
Fast
Fnonstd
Fns
Fround=r
Ftrap=t
Hname
Keeptmp
Help or -flags
Ipathname
Iname
Hostname% pc -l random.p
Ldirectory
Misalign
Libmieee
Libmil
Llib
Nolibmil
Native
Nocx
Nolib
Olevel
Notrace
Hostname% limit datasize 16M
Hostname% pc -o myprog myprog.p
Ofilename
Hostname% /usr/sbin/swap -s
Hostname% /usr/sbin/prtconf grep Memory
Pic,-Kpic and -PIC,-KPIC
Using the -pOption
Using the -pgOption
-pg
Qoption
Qpathpathname
Qproduce
Rpathdir
Pascal 4.0 User’s Guide
Examples
Hostname% pc -Rw recvar.p
Hostname% pc -Rw rr.p
Commands to compile and execute with.p
Pascal main program, with.p with statement
Hostname% pc -Rw with.p
Slevel
Sbfast
Hostname% pc -S rmc.p
Hostname% pc -temp=. hello.p
Temp=dir
Hostname% pc -time hello.p
Time
Xarch=a
Uname
Pascal 4.0 User’s Guide
Value Meaning
Limit the instruction set to V8 architecture
S1/l1/a1 S1/l1/a1s2/l2/a2 S1/l1/a1s2/l2/a2s3/l3/a3
Xcache=c
Example -xcache=16/32/41024/32/1specifies the following
Xchip=c
Xcg92
Xcg89
Xlibmil
Xildoff
Xildon
Xlibmieee
Xnolib
Xlibmopt
Xlicinfo
XMerge
Xprofile=p
Xpg
-xprofileValues
Example -xregs=appl,no%float
Xregs=r
Xsafe=mem
Xsb
Xsbfast
Xtarget=t
Xspace
XtargetExpansions
Pascal 4.0 User’s Guide
Pascal Compiler
Ztext
Units
Program Construction Management
Using Program Units and Module Units
Compiling with Units
Hostname% pc programunit.p moduleunit.p
Program Construction and Management
Using Units and Header Files
Sharing Variables Between Units
Here is a program unit that declares a variable
Program Construction and Management
Libraries
Working with Units
Separate Compilation
Using Program Units
Using Module Units
Sharing Variables and Routines Across Multiple Units
Separate Compilation
Compiling without the -xlOption
Sharing Public Variables
Program unit
Using include Files to Share Variables and Routines
Using extern Option to Share Routines
Hostname% pc incprog.p incmod.p
Commands to compile and execute incprog.p and incmod.p
Program unit, incprog.p, which includes the file
Module unit, incmod.p, which also includes the file
Using public var Declarations
Using the -xlOption
Commands to compile and execute pubvarprog.p and pubvarmod.p
Using the define Variable Attribute
Commands to compile and execute defvarprog.p and defvarmod.p
Using the define Declaration
Module unit
Using include Files
Program unit, incprog2.p Module unit, incmod2.p
Using extern
Commands to compile and execute incprog2.p and incmod2.p
Program unit, extprog.p
Commands to compile and execute extprog.p and extmod.p
Sharing Declarations in Multiple Units
Module unit, extmod.p
Pascal 4.0 User’s Guide
Compilation of Mixed-Language Programs
C-Pascal Interface
Hostname% cc -c myc.c Hostname% pc -calign myc.o mypascal.p
Compatibility of Types for C and Pascal
Precautions with Compatible Types
Character Strings
C-Pascal Interface
Enumerated Types
Incompatibilities
Array Indexes
Aggregate Types
Procedure Calls C-Pascal
General Parameter Passing in C and Pascal
Pascal Set Types
Variable Parameters
Commands to compile and execute Samp.p
Simple Types without -xl
Pascal procedure, SimVar.p
Strings of Characters
Commands to compile and execute SimVar.p and SimVarMain.c
Pascal procedure
Simple Types with -xl
Commands to compile and execute StrVar.p and StrVarMain.c
Fixed Arrays
C main program
Commands to compile and execute FixVec.p and FixVecMain.c
Pascal procedure, FixVec.p
Day =
100
Univ Arrays
C-Pascal Interface 101
Conformant Arrays
102
Example 1 Single-Dimension Array
C-Pascal Interface 103
Example 2 Multi-Dimension Array
104
Example 3 Array of Characters
C-Pascal Interface 105
Records and Structures
106
Commands to compile and execute StruChr.p and StruChrMain.c
C-Pascal Interface 107
Pascal routine
108
Variant Records
C-Pascal Interface 109
Commands to compile and execute VarRec.p and VarRecMain.c
110
Pascal Set Type
C-Pascal Interface 111
Pascal intset Type
112
Value Parameters
C-Pascal Interface 113
Commands to compile and execute SimVal.p and SimValMain.c
114
Arrays
C-Pascal Interface 115
Function Return Values
Simple Types
Pascal function
116
Commands to compile and execute RetReal.p and RetRealMain.c
Pascal procedure, IO.p C main program, IOMain.c
Input and Output
C-Pascal Interface 117
Procedure Calls Pascal-C
Hostname% cc IO.o IOMain.c -lpc
C function, SimRef.c
118
C function, StrVar.c
Pascal main program, StrVarMain.p
C-Pascal Interface 119
Commands to compile and execute StrVar.c
Incorrect use of string in static variable storage
120
C-Pascal Interface 121
Commands to compile and execute FixVec.c
C function, FixVec.c
Pascal main program
122
C function, UniVec.c
C-Pascal Interface 123
C function, IntCA.c
Commands to compile and execute IntCA.c and IntCAMain.p
C function, StruChr.c
124
Out
Commands to compile and execute StruChr.c and StruChrMain.p
StruChr.c
Calign StruChr.o StruChrMain.p
126
C function, VarRec.c
Non-Pascal Procedures
Commands to compile and execute VarRec.c
C-Pascal Interface 127
128
C-Pascal Interface 129
C function, SimVal.c
130
Commands to compile and execute SimVal.c
C function, ProcPar.c
Parameters That Are Pointers to Procedures
Commands to compile and execute RetReal.c and RetRealMain.p
C function, RetReal.c
132
Procedures and Functions as Parameters
Pascal procedure, GloVar.p
Global Variables in C and Pascal
C-Pascal Interface 133
C procedure, UseFilePtr.c
File-Passing Between Pascal and C
134
C-Pascal Interface 135
136
Sample Interface
C++-Pascal Interface
++ Name Encoding
Procedure Calls C++-Pascal
Pascal procedure, Samp, in the file, Samp.p
Compatibility of Types for C++ and Pascal
C++-Pascal Interface 139
Arguments Passed by Reference
C++ main program, SampMain.cc
Hostname% pc -c Samp.p
Pascal procedure, SampRef, in the file, Samp.p
Simple Types without the -xlOption
140
Hostname% pc -c SamRef.p
Commands to compile and execute SamRef.p and SamRefMain.cc
Simple Types with the -xlOption
C++ main program
142
Commands to compile and execute StrRef.p and StrRefMain.cc
Hostname% pc -c StrRef.p
C++-Pascal Interface 143
144
Hostname% pc -c FixVec.p
C++-Pascal Interface 145
-calignoption
Hostname% pc -c DaysOfWeek.p
146
Commands to compile and execute StruChr.p
Hostname% pc -c StruChr.p
C++-Pascal Interface 147
148
C++-Pascal Interface 149
150
Arguments Passed by Value
Hostname% pc -c DayWeather.p
Hostname% pc -calign -c DayWeather.p
C++-Pascal Interface 151
152
Commands to compile and execute SimVal.p
Commands to compile and execute RetReal.p
Hostname% pc -c RetReal.p
C++-Pascal Interface 153
154
Input and Output
Hostname% pc -c RetShortReal.p
Pascal function, IO.p
C++-Pascal Interface 155
Procedure Calls Pascal-C++
C++ main program, IOMain.cc
Hostname% CC IO.o IOMain.cc -lpc hostname% a.out
Simple Types Passed by Reference
C++ function, SimRef.cc
156
C++-Pascal Interface 157
158
C++ function, SimVal.cc
C++-Pascal Interface 159
Commands to compile and execute SimVal.cc
160
C++ function, RetReal.cc
C++-Pascal Interface 161
Pascal procedure, GloVar.p C++ main program, GloVarMain.cc
Commands to compile and execute GloVar.p and GloVarMain.cc
Global Variables in C++ and Pascal
C++ procedure
Pascal File Pointers to C++
162
Compiler Mixed-Language Programs
FORTRAN-Pascal Interface
164
Compatibility of Types for Fortran and Pascal
FORTRAN-Pascal Interface 165
Real Integer Integer*2
166
Multidimensional Arrays
General Parameter-Passing in Fortran and Pascal
FORTRAN-Pascal Interface 167
168
Procedure Calls FORTRAN-Pascal
Commands to compile and execute SimVar.p
Fortran main program
FORTRAN-Pascal Interface 169
Pascal procedure, StrVar.p
Fortran main program, StrVarmain.f
170
Commands to compile and execute StrVar.p and StrVarmain.f
Fortran main program, FixVecmain.f
FORTRAN-Pascal Interface 171
172
Commands to compile and execute FixVec.p
FORTRAN-Pascal Interface 173
Commands to compile and execute UniVec.p and UniVecmain.f
174
Commands to compile and execute IntCA.p
Commands to compile and execute ChrCA.p
Fortran main program, ChrCAmain.f
FORTRAN-Pascal Interface 175
176
FORTRAN-Pascal Interface 177
178
FORTRAN-Pascal Interface 179
180
FORTRAN-Pascal Interface 181
182
Commands to compile and execute SimVal.p and SimValmain.f
FORTRAN-Pascal Interface 183
Pascal procedure, ChrCAx.p
Commands to compile and execute ChrCAx.p
Pointers
184
Commands to compile and execute PastPtr.p
Procedure Calls Pascal-FORTRAN
Fortran main program, RetRealmain.f
FORTRAN-Pascal Interface 185
186
Fortran subroutine
FORTRAN-Pascal Interface 187
188
Fortran subroutine, StrVar.f
Hostname% pc StrVar.o StrVarmain.p -lpfc -lF77
Commands to compile and execute StrVar.f and StrVarmain.p
Character Dummy Arguments
Hostname% f77 -c StrVar.f
190
Following example illustrates this method
FORTRAN-Pascal Interface 191
Commands to compile and execute FixVec.f
Fortran subroutine, UniVec.f
Pascal main program, UniVecmain.p
192
Commands to compile and execute UniVec.f and UniVecmain.p
Hostname% f77 -c UniVec.f
FORTRAN-Pascal Interface 193
194
Fortran subroutine, StruChr.f
FORTRAN-Pascal Interface 195
Commands to compile and execute StruChr.f and StruChrmain.p
Hostname% f77 -c StruChr.f
Hostname% pc StruChr.o StruChrmain.p -lpfc -lF77
196
FORTRAN-Pascal Interface 197
198
FORTRAN-Pascal Interface 199
200
Fortran function, RetReal.f
Commands to compile and execute PassPtr.f and PassPtrmain.p
Hostname% f77 -c PassPtr.f
Hostname% pc PassPtr.o PassPtrmain.p -lpfc -lF77
Commands to compile and execute RetReal.f and RetRealmain.p
Routines as Parameters
202
FORTRAN-Pascal Interface 203
204
Error Diagnostics
Compiler Syntax Errors
Illegal Characters
String Errors
Digits in Real Numbers
206
Replacements, Insertions, and Deletions
Error Diagnostics 207
Hostname% pc synerr.p
Expected Symbols and Malformed Constructs
Undefined or Improper Identifiers
208
Pascal program, mism.p
Error Diagnostics 209
Expected and Unexpected End-of-file
Hostname% pc synerr2.p
210
Compiler Semantic Errors
Format of the Error Diagnostics
Incompatible Types
Procedure and Function Type Errors
Error Diagnostics 211
Scalar Class
Scalar Error Messages
Expression Diagnostics
212
Error Diagnostics 213
This program generates the following error messages
214
Type Equivalence
Error Diagnostics 215
Unreachable Statements
Pascal program, unreached.p
Hostname% pc unreached.p
Goto Statement
Uninitialized Variables
Unused Variables, Constants, Types, Labels, and Routines
Compiler Panics, I/O Errors
Runtime Errors
Error Diagnostics 217
218
Error Diagnostics 219
220
Overview
XView Toolkit
222
Tools
Objects
Object-Oriented Programming
Pascal Interface
Drawable Object Window Icon
XView Toolkit 223
Names
Attribute Procedures
Compiling with Libraries
Header Files
XView Toolkit 225
Attribute Lists
226
Handles
Data Types
Here, mymenu is an object of type XVobject
XView Toolkit 227
Conversion of C to Pascal
Coding Fragment
An Example
228
Pascal
XView Toolkit 229
Sample Translation of an XView Function to Pascal
230
Sample Program
XView Toolkit 231
Menu Demo Program
232
Panelbutton
Math Libraries
Contents of the Math Libraries
Math Libraries 235
Libm Functions
236
Ieee Support Functions
Ieeefunctions
Ieeevalues
Math Libraries 237
Sparc Libraries
Ieeeretrospective
238
Math Libraries 239
Arithmetic Exceptions
240
Math Library Exception-Handling Function matherr
Math Libraries 241
242
Libsunmath Support for Ieee Modes and Exceptions
Math Libraries 243
244
Conditional Variables
Pascal Preprocessor
246
Compiler Directives
Pascal Preprocessor 247
%config Directive
248
Hostname% pc -xl config.p hostname% a.out
Pascal Preprocessor 249
Output when you define two
Output when you define foo
%debug Directive
%else Directive
Hostname% pc -xl -cond debug.p hostname% a.out
250
Pascal Preprocessor 251
Hostname% pc -xl -config red ifthenelse.p hostname% a.out
%elseif Directive
Pascal program, ifthenelse.p
252
Hostname% pc -xl -config blue elseif.p hostname% a.out
%elseifdef Directive
Pascal program
Pascal Preprocessor 253
%enable Directive
Hostname% pc -xl -config bird2 ifdef.p hostname% a.out
254
Pascal Preprocessor 255
%error Directive
Hostname% pc -xl enable.p hostname% a.out
%endif Directive
Error.p
%exit Directive
256
%if Directive
Hostname% pc -xl exitdirective.p hostname% a.out
Pascal Preprocessor 257
258
%ifdef Directive
Pascal Preprocessor 259
%include Directive
%list Directive
Module unit, includemod.p
260
Pascal Preprocessor 261
Pascal program, list.p
%nolist Directive
List.p
262
Pascal Preprocessor 263
%slibrary Directive
%var Directive
%warning Directive
Output when you compile warning.p without the -configoption
Pc -xl warning.p
264
Error Messages
266
Fourth argument to function must be of type type, not type
Error Messages 267
268
Error Messages 269
270
Function requires a to be an unpacked array, not type
Error Messages 271
272
Error Messages 273
274
Identifier
Error Messages 275
276
Unknown option for procedure pointer ignored option
Error Messages 277
278
Error Messages 279
280
Error Messages 281
282
Cannot mix sets with integers and reals as operands of type
Error Messages 283
284
Error Messages 285
286
Error Messages 287
288
Multiply defined label in case, lines number and number
Error Messages 289
290
Error Messages 291
292
Error Messages 293
294
OUT
Error Messages 295
296
297
Index
298
Index 299
300
Index 301
302
Index 303
304
Index 305
306
Index 307
Marques