sys7.1-doc-wip/Make/CreateStdEquAOptions

#
#	File:		CreateStdEquAOptions
#
#	Contains:	xxx put contents here xxx
#
#	Written by:	xxx put writers here xxx
#
#	Copyright:	© 1993 by Apple Computer, Inc., all rights reserved.
#
#	Change History (most recent first):
#
#		 <1>	 3/31/93	IH		first checked in
#
#

#	CreateStdEquAOptions
#
#	Usage
#		CreateStdEquAOptions {FeatureSet}
#
#	Takes the Features and sets the equivalent StandardEqu features
#		There are only two features that I care about ROMFastTraps and
#		Supports24Bit.  To use these features (particularly in Traps.a)
#		in StandardEqu.d, the names must be changed to StandardEquSupports24Bit
#		and StandardEquROMFastTraps.  This script maps the feature
#		settings to StandardEqu features.
#
#	To Do
#		If there start to be more standard equates features, we should 
#		make this script take a feature list rather than just
#
	Unset TempStdEquAOpts
	Set TempFeatureCopy "{1}"
	
	If "{TempFeatureCopy}" =~ /≈(ROMFastTraps)®1=([¬ ∂t]+)®2(≈)/
		If "{®2}" =~ /TRUE/
			Set ®2	1
		Else if  "{®2}" =~ /FALSE/
			Set ®2	0
		Else
			echo "unknown feature define {®1}={®2}"
		End
		If "{TempStdEquAOpts}" =~ /(≈)®3{®1}=[¬ ∂t]+(≈)®4/
			Set TempStdEquAOpts "{®3} StandardEqu{®1}={®2} {®4}"
		Else
			Set TempStdEquAOpts "{TempStdEquAOpts} -d StandardEqu{®1}={®2}"
		End
	End

	
	If "{TempFeatureCopy}" =~ /≈(Supports24Bit)®1=([¬ ∂t]+)®2(≈)/
		If "{®2}" =~ /TRUE/
			Set ®2	1
		Else if  "{®2}" =~ /FALSE/
			Set ®2	0
		Else
			echo "unknown feature define {®1}={®2}"
		End
		If "{TempStdEquAOpts}" =~ /(≈)®3{®1}=[¬ ∂t]+(≈)®4/
			Set TempStdEquAOpts "{®3} StandardEqu{®1}={®2} {®4}"
		Else
			Set TempStdEquAOpts "{TempStdEquAOpts} -d StandardEqu{®1}={®2}"
		End
	End

	Echo {TempStdEquAOpts}