A question about saving program running output

[zhou@hokulea.soest.hawaii.edu]

Hello Lisp Experters,

I am looking for a system function.

The question is: Is there some easy way to re-direct the 
program's running output to a file ? I could change all the
terminal print sentences (format t) to file print (format stream). 
But that seems too much trouble. I am wondering there might 
have a system function to do it. 
 
I am using Allegro CL 4.1 on SPARC. 
 
With Respect,
 
- Mei