blob: cbae6d54efacda95df0746fded1c063605751a58 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
include <pkg/mef.h>
# MEF_CLOSE -- Closes mef file descriptor and free up mef memory
# descriptor.
procedure mef_close(mef)
pointer mef #I Mef descriptor
begin
call close(MEF_FD(mef))
if (MEF_HDRP(mef) != NULL)
call mfree(MEF_HDRP(mef), TY_CHAR)
call mfree (mef, TY_STRUCT)
end
|
