PATH=$PATH:/sys/usr2/sksh/bin:/sys/bin:/usr/bin:/sys/rexxc
export PATH

alias gcc='rx usr:bin/gcc.rexx'
alias c++='rx usr:bin/gpp.rexx'
alias g++='rx usr:bin/gpp.rexx'
alias gpp='rx usr:bin/gpp.rexx'

alias awk=gawk
alias grep=/usr/bin/ggrep
alias uniq='rx sys:bin/uniq.rexx'

function pathconv {

	for p in $*
	do
		case $p in
		/*)
			p=${p#/}

			case $p in 
			*/*)
				p_head=${p%%/*}
				p_tail=${p#*/}
				p=${p_head}:${p_tail}
				;;
			*)
				p=${p}:
				;;
			esac
		esac

		echo -n "$p " 
	done | sed -e 's?\.\./?/?g' -e 's?\./??g'
}

function basename {
	x='y=${1%${2}}'
	eval $x
	echo $y
}

function _sleep {
	/sys/c/wait $1 secs
}
alias sleep=_sleep

function _touch {
	touch `pathconv $*`
}
alias touch=_touch

function _ln {
	ln `pathconv $*`
}
alias ln=_ln

#function _rm {
#	if [ X"$1" = X-f ] ; then
#		force=force
#		shift
#	else
#		force=
#	fi
#
#	delete `pathconv $*` quiet $force
#}

function _rm {
	rm `pathconv $*`
}
alias rm=_rm

function _mkdir {
	mkdir `pathconv $*`
}
alias mkdir=_mkdir

function _cp {
	copy `pathconv $*` clone
}
alias cp=_cp

#function _chmod {
#    shift
#    protect `pathconv $*` +s
#}
function _chmod {
	chmod `pathconv $*`
}
alias chmod=_chmod

function _expr {
	/sys/c/eval $*
}
alias expr=_expr

function _cat {
	cat `pathconv $*`
}
alias cat=_cat
