blob: cbcb244e6dc3b0637d2ca246047ede19b3745958 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
# EC_GETIM -- Get next image name with standard image extensions removed.
int procedure ec_getim (list, image, maxchar)
int list # Image list
char image[maxchar] # Image name
int maxchar # Maximum number of chars in image name
int stat, imtgetim()
begin
stat = imtgetim (list, image, maxchar)
if (stat != EOF)
call xt_imroot (image, image, maxchar)
return (stat)
end
|
