Free Pascal

Borland Pascal byl v dobách DOSu bezpochyby jedním z nejpopulárnějších programovacích prostředků. Je tedy jasné, že existuje velká komunita programátorů, kteří tento jazyk znají. Proto se dnes podíváme na Free Pascal Compiler, který se snaží být kompatibilní právě s dialektem jazyka Pascal firmy Borland.

14.4.2004 08:00 | Aleš Hakl | přečteno 22623×

Free Pascal Compiler je kompilátorem vlastního specifického jazyka, který se dle nastavení podobá buďto původnímu Borland Pascalu nebo jazyku Object Pascal používanému v prostředích Delphi a Kylix. K tomu ovšem Free Pascal přidává mnohé svoje rozšíření, jako například přetěžování operátorů, komentáře ala C++ a podobně. Zajímavou vlastností je, že většina vlastností jazka je konfigurovatelná, díky čemuž je paradoxně v některých případech s produkty firmy Borland kompatibilnější než tyto produkty mezi sebou navzájem.

FPC je samostatný kompilátor, nikoli pouhý frontend ke gcc. Tento stav přináší některé výhody (zejména nezávislost na GCC ^__^). Boužel je tímto způsobeno že FPC nepodporuje tolik platforem, podporované procesory jsou pouze dva: i386 a m68k. Mezi podporované operační systémy patří samozdřejmě Linux a NetBSD, pro platformu i386 ještě FreeBSD, QNX a Solaris a nebo i tak exotické systémy jako DOS, OS/2, Windows nebo třeba PalmOS. Experimentátory jistě potěší podpora Amigy nebo BeOS.

Osobně si myslím, že síla Free Pascalu leží ve velmi bohaté standardní knihovně, která se snaží překrývat standardní knihovnu z Borland Pascalu. A též obsahuje takzvané balíčky (packages) což jsou rozhraní k nejrůznějším knihovnám známým z C, například mysql, gtk, Xlib, nebo třeba podpora sítí. To jsme se ještě ovšem nedostali k jádru jazyka Object Pascal a to k objektovému programování. Součástí instalace Free Pascalu je poměrně rozsáhlá knihovna FCL, která implementuje některé nevizuální komponenty prostředí Delphi (TComponent, TList, TStrings, TINIFile...) a dále obsahuje mnoho užitečných tříd a komponent, namátkou:

Nevýhodou této knihovny může být pro někoho fakt, že je z větší části pod licencí GPL, důsledky této licence nemusím doufám dále rozebírat.

Pro Free Pascal je také dostupné vývojové prostředí, které se snaží kopírovat vzhled IDE od firmy Borland pro MS-DOS. Osobně mám s tímto IDE na unixových platformách spíše špatné zkušenosti, pravdou ovšem zůstává, že i autoři uvádějí IDE spíše jako beta verzi. A navíc IDE ve verzi 1.0.10 již pro jistotu na unixech nefunguje nejspíše vůbec, protože se z instalace potichu vytratila knihovna Free Vision, kterou potřebuje ke své činnosti.

Ale nechme šedé teorie a vrhněme se na vlastní instalaci. Protože je Free Pascal Compiler napsán v Pascalu, je jinak v unixu běžná cesta kompilace přímo na cílovém stroji silně neschůdná, až skoro nemožná, a proto raději necháme experimentů a stáhneme si binární balíček ze stránek projektu.

Kompilátor ke své činnosti potřebuje některé poměrně běžné utilitky, na oficiálních stránkách bývalo napsáno, že jsou potřeba binutils, dnes to tam napsáno není (alespoň jsem nic takového nenašel), ale přesto věřím tomu, že jsou vyžadovány i nadále. Obecně by se dalo říct, že kde funguje gcc tam funguje i FPC.

Zde si v sekci download vybereme požadovanou platformu (tj. většinou Linux (Intel X86)). Majitelé distribucí postavených na RPM si stáhnou balíček, debianisté (jako třeba já) si stáhnou balíček nebo zadají apt-get install fpc. A ti ostatní, na které autoři nemyslí si stáhnou buďto poměrně velký soubor fpc-číslo_verze.procesor.tar a nebo můžete stáhnout jednotlivé části tohoto archívu samostatně (soubory install.sh, binary.tar, docs.tar.gz, demo.tar.gz a sources.tar).

Nyní rozbalíme velký archiv na vhodné místo, respektive umístíme všechny stažené soubory do jednoho adresáře a v terminálu spustíme soubor install.sh (Příkazem sh install.sh). Instalátor se nás zeptá na několik věcí (pro běžnou instalaci by mělo stačit mačkat Return / Enter / Obdobnou klávesu vašeho počítače) a poté provede samotnou instalaci.

Pokud se instalace povedla (ono na ní není mnoho co by se mohlo nepovést) měli bychom po spuštění fpc dostat "krátký" (zhruba 3 strany A4) výpis použitelných parametrů kompilátoru.

Pokud toto funguje, můžeme si skusit oblíbený to program "Hello world". VE svém oblíbeném textovém editoru si vytvoříme soubor helloWorld.pas s tímto obsahem:

program helloWorld;
begin
  writeln('Zdravime Free Pascal')
end.

A následně zkompilujeme:

$ fpc helloWorld.pas
Free Pascal Compiler version 1.0.10 [2003/06/26] for i386
Copyright (c) 1993-2003 by Florian Klaempfl
Target OS: Linux for i386
Compiling helloWorld.pas
Assembling helloworld
Linking helloworld
4 Lines compiled, 0.2 sec

Čímž dostaneme binárku helloworld, kterou nyní můžeme spustit:

$ ./helloworld
Zdravime Free Pascal

Čímž jsme si krásně ukázali, že naše instalace funguje (případně jsme si ukázali, že jsme něco udělali špatně a tudíž nefunguje).

Příště se vrhneme na nějaké praktické ukázky. Docela bych byl rád za nějaké ohlasy v diskuzi, zejména ve směru kudy by se měl případný seriál dále ubírat, jestli se zabývat základy Pascalu nebo spíše odlišnostmi mezi BP a FPC... Jsem flexibilní, přispůsobím se zájmům vás, čtenářů.

A ještě poznámka na závěr: Jsem si moc dobře vědom, že Pascal vznikl jako jazyk pro výuku programování a osobně bych se asi bál psát rozsáhlejší program ve FPC. Ale přesto si myslím (a ohlasy to potvzují), že FPC může mnoha občasným programátorům, kteří používají Linux, usnadnit jejich přechod z jiného operačního systému.

Online verze článku: http://www.linuxsoft.cz/article.php?id_article=99