blob: 9e0f08bf86654ddbb291d3dcad4d850642c67043 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
# IMRENAME -- Rename an image.
procedure imrename (old, new)
char old[ARB] # old image name
char new[ARB] # new image name
begin
call iki_init()
call iki_rename (old, new)
end
|
