2006-11-04 08:49:52 +08:00
|
|
|
#!/bin/sh
|
|
|
|
#
|
|
|
|
# Program: notcast
|
|
|
|
#
|
|
|
|
# Synopsis: Returns 0 if the input does not contain a cast operator
|
|
|
|
#
|
2006-11-04 08:58:39 +08:00
|
|
|
# Syntax: notcast tailexpr
|
|
|
|
#
|
|
|
|
# tailexpr - optionally allows a regular expression to go at the end
|
|
|
|
#
|
2006-11-04 08:49:52 +08:00
|
|
|
|
2006-11-04 08:58:39 +08:00
|
|
|
if grep '\(\([sz]ext\)\|\(trunc\)\|\(fp2[us]int\)\|\([us]int2fp\)\|\(bitconvert\)\|\(fpext\)\|\(fptrunc\)\)'"$1"
|
2006-11-04 08:49:52 +08:00
|
|
|
then exit 1
|
|
|
|
else exit 0
|
|
|
|
fi
|