; Author: Copyright 1993 Jason Williams

        GET     Desk.sh.regdefs
        GET     ^.h.swinos
        GET     Desk.sh.macros

; Desk_PopUp_Close(Desk_popup_handle)

        PREAMBLE
        STARTCODE Desk_PopUp_Close
;
        STMFD   sp!, {lr}
        SWI     Desk_SWI_PopUp_Close + Desk_XOS_Bit
        Desk_Error2_CheckV
        LDMFD   sp!, {pc}^
;
        END
