Subversion Repositories openrisc

/*

 * sim-close.S -- close interface for frv simulator

 *

 * Copyright (c) 2002 Red Hat, Inc

 *

 * The authors hereby grant permission to use, copy, modify, distribute,

 * and license this software and its documentation for any purpose, provided

 * that existing copyright notices are retained in all copies and that this

 * notice is included verbatim in any distributions. No written agreement,

 * license, or royalty fee is required for any of the authorized uses.

 * Modifications to this software may be copyrighted by their authors

 * and need not follow the licensing terms described here, provided that

 * the new terms are clearly indicated on the first page of each file where

 * they apply.

 */

#include 

#include "syscall.h"

/*

 * Input:

 * gr8    -- File descriptor to close.

 *

 * Output:

 * gr8    -- 0 or -1.

 * errno  -- Set if an error

 */

        .globl  EXT(_close)

        .type   EXT(_close),@function

        .weak   EXT(close)

        .text

EXT(_close):

EXT(close):

        setlos  #SYS_close,gr7

        tira    gr0,#0

        ret

.Lend:

        .size   EXT(_close),.Lend-EXT(_close)