Třídění slučováním (mergesort) – Pascal – Fórum – Programujte.com

Dobrý den,

následující program pro třídění pole sléváním jsem napsal podle funkční předlohy pro třídění seznamů sléváním, kterou jsem také napsal. Z nějakého důvodu ovšem dostávám segmentation fault, a to i přesto, že nikde nevypadávám z mezí použitých typů, což jsem testoval... Nevidíte někdo prosím, kde by mohla být chyba?

Díky.

Slucovani: http://tny.cz/cb02ed08

Prace s poli: http://tny.cz/d01815cd

#1 Pierre
Nepíšeš v jakém překladači to děláš (tipuju freepascal) a nepíšeš bližší podrobnosti o té chybě, tak jen tipuju, že ti přeteče zásobník, protože děsně plýtváš pamětí.

Za prvé procedurám a funkcím nepředávej pole jako parametr volaný hodnotou, protože tím zabíráš na zásobníku (naprosto zbytečně) celé pole. Volej to jménem (odkazem).

Za druhé indexy pole používáš od nuly, ale deklaruješ pole s indexy -32768 až 32767, neboli půlka toho pole ti beztak leží ladem. A opravdu těch čísel potřebuješ zpracovávat 32768? Jestli je to "školní úloha", nestačí jich třeba 1000?

Místo zjišťování jak velké je pole hledáním nulové položky si raději tu velikost ukládej (navíc copak v poli nemůže být regulérně nulová hodnota?).

#2 JoDiK
Děkuju za odpověď! Příště už si dám na takové chyby pozor.