summaryrefslogtreecommitdiff
path: root/dviware/crudetype/version3/primos.cpl
blob: 3eecfc68e811de36d7b78f39d4eb369907b526bf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37

/* PRIMOS.CPL
/* CPL Macro to tangle, compile and load Crudetype for Primos
/* Jon Warbrick, 06/88

/*************************************************

/* You will have to change the next three lines
/* to give the correct commands to run TANGLE
/* and the Sheffield Pascal Compiler on your
/* system, and to give the name of the Pascal
/* library.

&s tangle_command := R TEX>CMDNC0>TANGLE
&s pascal_command := PASCAL
&s pascal_library := PASCAL

/*************************************************

&args program = PRIMOS

COMO CRUDETYPE.COMO
%tangle_command% CRUDETYPE.WEB %program%.CH
COMO -E

&if ^ [query 'OK to go on' TRUE] &then &stop

%pascal_command% %program% -BIG -EPF_ARGS

&data BIND
lo %program%
li %pascal_library%
li
file CRUDETYPE.RUN
&end

&return