Example programs for the P4 Pascal compiler
thomas...@gmx.at
Are there any Pascal programs without 'modern' features such as
'units'? I want to compile the programs with the P4 Pascal compiler.
I am experimenting with the P4 Pascal compiler. I managed to
reconstruct the original P4 and I have also a Gpc, a Turbo and a
Seed7 version of the P4 and the I4 (interpreter for PCODE). So far
all this compilers are able to compile the original P4 (and the
resulting PCODE is identical). I want to test this P4 versions with
more example programs. Are there Pascal programs which can be used
to test the P4? I am interested in normal programs and in feature
test programs.
Since many programs use extensions, it seems hard to find Pascal
programs for the P4.
Thank you in advance.
Greetings Thomas Mertes
Seed7 Homepage: http://seed7.sourceforge.net
Seed7 - The extensible programming language: User defined statements
and operators, abstract data types, templates without special
syntax, OO with interfaces and multiple dispatch, statically typed,
interpreted or compiled, portable, runs under linux/unix/windows.
Dr J R Stockton
a29g2000pra.googlegroups.com>, Wed, 31 Dec 2008 07:38:33,
thomas...@gmx.at posted:
>Are there any Pascal programs without 'modern' features such as
>'units'? I want to compile the programs with the P4 Pascal compiler.
141 of the 167 *.PAS files probably indexed via sig line 3 do not
contain the word "unit". Some might be suitable. All are BP7, some
TP5. In addition, LONGCALC there can be run as a program. It includes
a call of the DOS unit, but I rather think that is only for features
which could be omitted. It's the biggest program there, and might
challenge P4.
--
(c) John Stockton, nr London UK. ?@merlyn.demon.co.uk DOS 3.3, 6.20; WinXP.
Web <URL:http://www.merlyn.demon.co.uk/> - FAQqish topics, acronyms & links.
PAS EXE TXT ZIP via <URL:http://www.merlyn.demon.co.uk/programs/00index.htm>
My DOS <URL:http://www.merlyn.demon.co.uk/batfiles.htm> - also batprogs.htm.
CBFalconer
>
> Are there any Pascal programs without 'modern' features such as
> 'units'? I want to compile the programs with the P4 Pascal compiler.
>
> I am experimenting with the P4 Pascal compiler. I managed to
> reconstruct the original P4 and I have also a Gpc, a Turbo and a
> Seed7 version of the P4 and the I4 (interpreter for PCODE). So far
> all this compilers are able to compile the original P4 (and the
> resulting PCODE is identical). I want to test this P4 versions with
> more example programs. Are there Pascal programs which can be used
> to test the P4? I am interested in normal programs and in feature
> test programs.
>
> Since many programs use extensions, it seems hard to find Pascal
> programs for the P4.
Get pascalp.zip from my download section (see sig below). That is
an EXE of code developed from the P4 compiler many years ago and
runs under MSDOS. I lost the various sources in disk crashes and
other calamities.
The Pcode is close to Wirths, but not identical. The compiler
output is text for a Pcode assembler. So you can read everything.
ppmanual.zip also exists there.
pascalp doesn't use units, but is capable of separate compilation,
etc. See the manual.
There are more complete systems available for use under CP/M, in
the download/cpm section.
--
Merry Christmas, Happy Hanukah, Happy New Year
Joyeux Noel, Bonne Annee, Frohe Weihnachten
Chuck F (cbfalconer at maineline dot net)
<http://cbfalconer.home.att.net>
thomas...@gmx.at
> thomas.mer...@gmx.at wrote:
>
> > Are there any Pascal programs without 'modern' features such as
> > 'units'? I want to compile the programs with the P4 Pascal compiler.
>
> > I am experimenting with the P4 Pascal compiler. I managed to
> > reconstruct the original P4 and I have also a Gpc, a Turbo and a
> > Seed7 version of the P4 and the I4 (interpreter for PCODE). So far
> > all this compilers are able to compile the original P4 (and the
> > resulting PCODE is identical). I want to test this P4 versions with
> > more example programs. Are there Pascal programs which can be used
> > to test the P4? I am interested in normal programs and in feature
> > test programs.
>
> > Since many programs use extensions, it seems hard to find Pascal
> > programs for the P4.
> > interpreted or compiled, portable, runs under linux/unix/windows.
>
> Get pascalp.zip from my download section (see sig below). That is
> an EXE of code developed from the P4 compiler many years ago and
> runs under MSDOS. I lost the various sources in disk crashes and
> other calamities.
So you have a DOS EXE without sources and the documentation of a P4
based system you once wrote. From your docu it seems that with the
sources a lot of work got lost also.
If you have a harddisk where the 'dd' command is unable to read, I
can provide a program which trys to recover as much as possible from
the device file. I wrote this program in 2006 to recover my harddisk
which lost several blocks. Linux was unable to mount it and 'dd'
could not copy something as long as there are bad blocks. Running a
file system checker is dangerous as long as a hardware error exists.
So I wrote the program savehd7.sd7 which copies from the device file
to a disk image file. The file system checker can fix this saved
disk image afterwards. Finally the saved and repaired disk image
file can be mounted with the loop mount feature of Linux. Luckily I
had only minimal losses. Since I wanted to do some final polishes to
the savehd7.sd7 program I did not release it. When it is of use to
someone I can add some documentation and release it.
> The Pcode is close to Wirths, but not identical. The compiler
> output is text for a Pcode assembler. So you can read everything.
>
> ppmanual.zip also exists there.
>
> pascalp doesn't use units, but is capable of separate compilation,
> etc. See the manual.
>
> There are more complete systems available for use under CP/M, in
> the download/cpm section.
Does this version contain the sources?
Are the sources of the DOS version reconstructable by this?
I am interested especially in test programs for the P4. I want to
be sure that the P4 written in Seed7 is as good as the original.
It will only contain little improvements, such as fixed bugs and
acceptance of ASCII characters with upper and lower case letters.
Probably also acceptance of tabs and carriage returns, and comments
with braces. What do you think about such simple extensions?
I will try to refrain from other extensions. When I am finished with
that I will release it as part of the Seed7 package and create a
page describing it at the Seed7 homepage. Beyond a Seed7 version of
the P4 I would like to create a Pascal to Seed7 converter. For such
a converter a P4 written in Seed7 is a good base. Later this
converter can also support popular Pascal extension, but this are
dreams of the future...
Greetings Thomas Mertes
Seed7 Homepage: http://seed7.sourceforge.net
Seed7 - The extensible programming language: User defined statements
and operators, abstract data types, templates without special
syntax, OO with interfaces and multiple dispatch, statically typed,
Charles Richmond
You might try Pascal-S. This is a stripped down version of a Pascal
interpreter written by Wirth. It is written in code that should compile
on the P4 compiler. You can find the details and source code at:
http://www.moorecad.com/standardpascal/pascals.html
--
+----------------------------------------------------------------+
| Charles and Francis Richmond richmond at plano dot net |
+----------------------------------------------------------------+
CBFalconer
> CBFalconer <cbfalco...@yahoo.com> wrote:
>
... snip ...
>
>> Get pascalp.zip from my download section (see sig below). That is
>> an EXE of code developed from the P4 compiler many years ago and
>> runs under MSDOS. I lost the various sources in disk crashes and
>> other calamities.
>
> So you have a DOS EXE without sources and the documentation of a P4
> based system you once wrote. From your docu it seems that with the
> sources a lot of work got lost also.
I have basically what I listed. The loss of the HD was nearly 20
years ago. The loss of the backups was about 10 years ago, and due
to theft.