Packages

myriad

1.0.15
1.0.15 1.0.14 1.0.13 1.0.12 1.0.11 1.0.10 1.0.9 1.0.8 1.0.7 1.0.6 1.0.5 1.0.4 1.0.3 1.0.2 1.0.1 1.0.0

Ceylan-Myriad, a generic-purpose Erlang toolbox, as an OTP application library here (see http://myriad.esperide.org)

Current section

Files

Jump to
Readme
16 Versions
0 Dependencies
Dependants
Files
Activity
myriad src scripts find-type-definition.sh
Raw

src/scripts/find-type-definition.sh 

#!/bin/sh





usage="  Usage: $(basename $0) A_TYPE [A_DIR]\nAttempts to find the definition of the specified Erlang type from specified directory (if any), otherwise from current one."



base_dir=$(pwd)



type="$1"



if [ $# -eq 2 ] ; then



	base_dir="$2"



	if [ ! -d "${base_dir}" ] ; then



		echo "  Error, specified base search directory (${base_dir}) does not exist." 1>&2

		exit 10



	fi



	shift



fi



if [ ! $# -eq 1 ] ; then



	echo "$usage" 1>&2

	exit 5



fi



base_dir=$(realpath ${base_dir})



echo "Looking for the '${type}' Erlang type, from '${base_dir}':"

echo





# DUMMY to force the display of the corresponding file.

# '{type}', not '{type}()', so that partial type names can still be found.

#



cd ${base_dir} && find . -name '*.?rl' -exec /bin/grep --after-context=4 --color -e "[[:space:]]\?-\(type\|opaque\)[[:space:]]\+${type}" DUMMY '{}' ';' 2>/dev/null