DataMuseum.dk Presents historical artifacts from the history of: Rational R1000/400 Tapes

This is an automatic "excavation" of a thematic subset of artifacts from Datamuseum.dk's BitArchive. See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software.

top - download

⟦13b69330b⟧ TextFile

    Length: 368 (0x170)
    Types: TextFile
    Names: »xsvrrunning.c«

Derivation

└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS 
    └─ ⟦91c658230⟧ »DATA« 
        └─⟦5d656759a⟧ 
            └─⟦50f09e4e4⟧ 
                └─ ⟦this⟧ »./xsvrrunning.c« 
└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS 
    └─ ⟦91c658230⟧ »DATA« 
        └─⟦5d656759a⟧ 
            └─⟦610eb0a19⟧ 
                └─ ⟦this⟧ »./xsvrrunning.c« 
└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS 
    └─ ⟦91c658230⟧ »DATA« 
        └─⟦5d656759a⟧ 
            └─⟦d97085656⟧ 
                └─ ⟦this⟧ »./xsvrrunning.c« 

#include <X11/Xlib.h>

void main()
{
/*--Exit with 1 if server is running; exit with 0 if server is not running. */

    extern Display *XOpenDisplay();
    extern XCloseDisplay();
    extern int exit();

    Display	*dpy;

    dpy = XOpenDisplay( (char*)0 );
    if (dpy == (Display*)0) { exit(0); }
    XCloseDisplay( dpy );
    exit(1);

} /* main, xsvrrunning */