#!/bin/csh -f

# Make SWI-Prolog <-> PCE interface

if ( ! $?MACHINE ) setenv MACHINE `../../machine`

if ( ! $?MACHID ) then
    set ids = (`echo Makefile-*[a-zA-Z0-9] | sed 's/Makefile-\([^ ]*\)/\1/g'`)
    foreach id ( $ids )
        if ( $MACHINE =~ $id* ) set MACHID=$id
    end

    if ( ! $?MACHID ) then
	echo "Don't know how to make PCE for $MACHINE"
	exit 1
    endif
endif

if ( ! -d ../$MACHINE ) then
    echo -n "Creating interface object directory ./pl/$MACHINE ... "
    mkdir ../$MACHINE
    ( cd ../$MACHINE; ln -s ../src/{interface.c,link.c,dump} . )
    ( cd ../$MACHINE; ln -s ../src/{pl-crt0.c,mangle.c,mlist} . )
    ( cd ../$MACHINE; ln -s ../src/Makefile-$MACHID ./Makefile )
    echo "done."
endif

(cd ../$MACHINE; make MACHINE=$MACHINE MACHID=$MACHID $*)
