#!/bin/sh
# --- Copyright University of Sussex 1993. All rights reserved. ----------
# File:             S.decstation/src/poplink_mit_xlibs
# Purpose:          Link Poplog against standard X libraries (without G0)
# Author:           Robert John Duncan, Nov 11 1991 (see revisions)
# Documentation:
# Related Files:

# Usage:
#	poplink_mit_xlibs [version]

if [ $# -eq 0 ]; then
	# just do clean up after link
	rm -r LibXt LibX11
	exit
fi

# Unpack Xt and X11 archives

mkdir LibX11
cd LibX11
ln -s /usr/lib/libX11-mit.a .
ar x libX11-mit.a
rm -f _* XvmsAlloc.o XvmsCalloc.o
cd ..

mkdir LibXt
cd LibXt
ln -s /usr/lib/libXt.a .
ar x libXt.a
rm -f _* VMSUtil.o XtCompRL.o XtCompTM.o
cd ..

# Output all X object files

echo LibXt/*.o LibX11/*.o



# --- Revision History ---------------------------------------------------
# --- John Gibson, May 14 1993
#		Renamed as poplink_mit_xlibs; now just outputs filenames on
#		standard output when given an arg, or deletes dirs created otherwise
# --- John Gibson, May 10 1993  Changed to set POP_XT_EXLIBS
# --- Robert John Duncan, Apr 16 1993 -- added version number as first arg.
# --- John Gibson, Mar 27 1993
#		Uses new -xcomplete option to pglink
