blob: aa06a57a5700cc4bc53d65f122099abc10189bad (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include "clpset.h"
# CLLPSET -- List a pset. Each param,value pair is written to the output
# file using the caller supplied format, e.g., "set %s = \"%s\"\n".
procedure cllpset (pp, fd, format)
pointer pp #I pset descriptor
int fd #I output file
char format[ARB] #I format, one %s each for param, value
begin
call clc_compress()
call clc_list (fd, PS_PSETNAME(pp), format)
end
|