Joulukalenteri 2009: Forth

Kirjoittaja: Antti Laaksonen (15.12.2009)

Forth on 1970-luvun alussa kehitetty ohjelmointikieli, jonka keskeinen elementti on lukuja sisältävä pino.

Forth-ohjelmat muodostuvat aliohjelmista, jotka sisältävät joukon suoritettavia komentoja. Tavalliset komennot liittyvät pinon käsittelyyn, ehto- ja toistorakenteisiin sekä aliohjelmien kutsumiseen.

Esimerkki: Tekstin tulostus

Aliohjelma JOULU tulostaa rivin tekstiä:

: JOULU
   ." Hauskaa joulua!" CR ;

Aliohjelman tulostus on seuraava:

Hauskaa joulua!

Esimerkki: Fibonaccin luvut

Aliohjelma FIBOLISTA tulostaa Fibonaccin lukuja:

: FIBOLISTA
   1 0
   BEGIN DUP 100 <
   WHILE DUP . CR OVER + SWAP
   REPEAT DROP DROP ;

Aliohjelman tulostus on seuraava:

0
1
1
2
3
5
8
13
21
34
55
89

Aliohjelma säilyttää pinossa joka vaiheessa kahta peräkkäistä Fibonaccin lukua. Ensin aliohjelma lisää pinoon luvut 1 ja 0. Sitten aliohjelma toistaa silmukkaa niin kauan kuin pinon ensimmäinen luku on alle 100. Silmukassa aliohjelma tulostaa pinon ensimmäisen luvun ja laskee pinoon yhtä suuremmat Fibonaccin luvut.

Esimerkki: Pinon käsittely

Seuraava komentosarja havainnollistaa pinon käsittelyä:

Hauska tietää

Forthin suunnittelija Charles H. Moore piti kieltä neljännen sukupolven ohjelmointikielenä, minkä vuoksi luonteva nimi kielelle olisi ollut Fourth. Kuitenkin Mooren käyttämässä tiedostojärjestelmässä nimen maksimipituus oli viisi merkkiä ja kirjain u jäi pois nimestä.

Linkkejä

• Forth Wikipediassa
• Johdatus Forth-ohjelmointiin
• Forth-tulkki nettisivulla