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