/*
**    Name: close.c
**
**    Date: Sat Jan  1 16:14:29 2005
**
**    Purpose:
**
*/

#include "csfcntl.h"
#include "osfind.h"
#include "kernel.h"

int csclose(int fd)
    {
    _kernel_swi_regs regs;

    regs.r[0] = OSFind_Close;
    regs.r[1] = fd;

    _kernel_swi(OS_Find,&regs,&regs);

    return 0;
    }
