[comp.lang.pascal] returning actual free memory?

nacer@mist.cs.orst.edu (Abdenacer Moussaoui C.) (01/30/89)

Can someone post a TP program that returns (print on the screen) the actual
free memory before it was run.
If you happen to have some documented code about testing and returning
available EMS this would also be very appreciated.
  Thank you.
  --nacer           nacer@mist.cs.orst.edu