2010. március 17., szerda

Pascal-FC és a Linux

Leszed:
ftp://ftp.cs.york.ac.uk/pub/software/unix/pfc-gnu.zip

Ami benne van elolvas...fordít.
Itt (pint.pas) voltak gondok, kb. 6 db. karaktert kiszedtem, fordult.

Ezek után fordítjuk (pfcccomp) és futtatjuk(pint).
Jómagam nem tudtam paraméterezni a a fenti programokat. Bekérik a forrást, listfájl meg objfájl fájlneveket kérnek....macerás.

Ezért alkotódott meg ez:

tedd:

#!/usr/bin/expect

spawn /bin/bash
sleep .2

send "./pfccomp\r"
sleep .2

set forras [lindex $argv 0]
expect "Input file `progfile':"
sleep .2
send "$forras\r"
sleep .2

set kimenet tmp_ki
expect "Output file `listfile':"
sleep .2
send "$kimenet\r"
sleep .2

set objektum tmp_obj
expect "Output file `objfile':"
sleep .2
send "$objektum\r"
sleep .2


send "./pint\r\r"
sleep .2

set futik futik
expect "Interpreter Version P5.3 - Output file `pmdfile':"
sleep .2
send "$futik\r"
sleep .2

expect "Input file `objfile':"
sleep .2
send "$objektum\r"

interact


Használata:
./tedd meg.pfc


Ennyi. Használjátok egészséggel! (:

Ui.: Ha nem fordul a pint.pas -> szólj :D