blob: 2d89647104ff1b749d86964ff3c73ecfb1033d94 [file] [log] [blame]
cristy3ed852e2009-09-05 21:47:34 +00001$!
2$! Make ImageMagick image coders for VMS.
3$!
4$
5$ define/nolog MAGICK [-.magick]
6$ define/nolog WAND [-.wand]
7$if (f$trnlnm("X11") .eqs. "") then define/nolog X11 decw$include:
8$compile_options="/nodebug/optimize"
9$if (f$search("sys$system:decc$compiler.exe") .nes. "")
10$then ! VAX with DEC C
11$ compile_options="/decc/nodebug/optimize/warning=(disable=rightshiftovr)"
12$else ! VAX with VAX C
13$define/nolog lnk$library sys$library:vaxcrtl
14$define/nolog sys sys$share
15$endif
16$if (f$getsyi("HW_MODEL") .gt. 1023)
17$then ! Alpha with DEC C
18$ define/nolog sys decc$library_include
19$ compile_options="/nodebug/optimize/prefix=all/warning=(disable=rightshiftovr)/name=(as_is,short)/float=ieee"
20$endif
21$
22$
23$write sys$output "Making Coders..."
24$call Make art.c
25$call Make avi.c
26$call Make avs.c
27$call Make bmp.c
28$call Make braille.c
29$call Make cals.c
30$call Make caption.c
31$call Make cip.c
32$call Make clip.c
33$call Make clipboard.c
34$call Make cmyk.c
35$call Make cut.c
36$call Make dcm.c
37$call Make dds.c
38$call Make dib.c
39$call Make dng.c
40$call Make dps.c
41$call Make dpx.c
42$call Make emf.c
43$call Make ept.c
44$call Make exr.c
45$call Make fax.c
46$call Make fits.c
47$call Make fpx.c
48$call Make gif.c
49$call Make gradient.c
50$call Make gray.c
51$call Make hald.c
52$call Make histogram.c
53$call Make hrz.c
54$call Make html.c
55$call Make icon.c
56$call Make info.c
57$call Make inline.c
58$call Make ipl.c
59$call Make jbig.c
60$call Make jpeg.c
61$call Make jp2.c
62$call Make label.c
63$call Make map.c
64$call Make mat.c
65$call Make matte.c
66$call Make meta.c
67$call Make miff.c
68$call Make mpc.c
69$call Make mpeg.c
70$call Make mpr.c
71$call Make msl.c
72$call Make mono.c
73$call Make mtv.c
74$call Make mvg.c
75$call Make null.c
76$call Make otb.c
77$call Make palm.c
78$call Make pattern.c
79$call Make pcd.c
80$call Make pcl.c
81$call Make pcx.c
82$call Make pdb.c
83$call Make pdf.c
84$call Make pict.c
85$call Make pix.c
86$call Make plasma.c
87$call Make png.c
88$call Make pnm.c
89$call Make preview.c
90$call Make ps.c
91$call Make ps2.c
92$call Make ps3.c
93$call Make psd.c
94$call Make pwp.c
95$call Make raw.c
96$call Make rgb.c
97$call Make rla.c
98$call Make rle.c
99$call Make sct.c
100$call Make sfw.c
101$call Make sgi.c
102$call Make stegano.c
103$call Make sun.c
104$call Make svg.c
105$call Make tga.c
106$call Make thumbnail.c
107$call Make tiff.c
108$call Make tile.c
109$call Make tim.c
110$call Make ttf.c
111$call Make txt.c
112$call Make uil.c
113$call Make url.c
114$call Make uyvy.c
115$call Make vicar.c
116$call Make vid.c
117$call Make viff.c
118$call Make wbmp.c
119$call Make wmf.c
120$call Make wpg.c
121$call Make x.c
122$call Make xbm.c
123$call Make xc.c
124$call Make xcf.c
125$call Make xpm.c
126$call Make xps.c
127$call Make xwd.c
128$call Make ycbcr.c
129$call Make yuv.c
130$call Make cin.c
131$call Make magick.c
132$call Make scr.c
133$deass magick
134$deass wand
135$library/create libCoders.olb art,avi,avs,bmp,braille,clip,clipboard,cip,cmyk, -
136 cut,dcm,dds,dib,dng,dps,dpx,emf,ept,exr,fax,fits,fpx,gif,gradient,gray, -
137 hald,histogram,hrz,html,icon,info,inline,ipl,jbig,jpeg,jp2,label,cals, -
138 caption,palm,map,mat,matte, -
139 meta,miff,mpc,mpr,msl,mpeg,mono,mtv,mvg,null,otb,pattern,pcd,pcl,pcx,pdb, -
140 pdf,pict,pix,plasma,png,pnm,preview,ps,ps2,ps3,psd,pwp,raw,rgb,rla,rle, -
141 sct,sfw,sgi,stegano,sun,svg,tga,thumbnail,tiff,tile,tim,ttf,txt,uil,url, -
142 uyvy,vicar,vid,viff,wbmp,wmf,wpg,x,xbm,xc,xcf,xpm,xps,xwd,ycbcr,yuv,cin, -
143 magick,scr,[-.magick]compress,[-.magick]prervicccm
144$exit
145$
146$Make: subroutine
147$!
148$! Primitive MMS hack for DCL.
149$!
150$if (p1 .eqs. "") then exit
151$source_file=f$search(f$parse(p1,".c"))
152$if (source_file .nes. "")
153$then
154$ object_file=f$parse(source_file,,,"name")+".obj"
155$ object_file=f$search( object_file )
156$ if (object_file .nes. "")
157$ then
158$ object_time=f$file_attribute(object_file,"cdt")
159$ source_time=f$file_attribute(source_file,"cdt")
160$ if (f$cvtime(object_time) .lts. f$cvtime(source_time)) then -
161$ object_file=""
162$ endif
163$ if (object_file .eqs. "")
164$ then
165$ write sys$output "Compiling ",p1
166$ cc'compile_options'/include_directory=([-],[-.magick],[-.jpeg],[-.png], -
167 [-.tiff],[-.ttf],[-.zlib]) 'source_file'
168$ endif
169$endif
170$exit
171$endsubroutine