removed unnecessary features
This commit is contained in:
@ -54,9 +54,7 @@ CAwk::CAwk ():
|
||||
{
|
||||
/* TODO: what is the best default option? */
|
||||
option =
|
||||
ASE_AWK_IMPLICIT |
|
||||
ASE_AWK_UNIQUEFN |
|
||||
ASE_AWK_SHADING |
|
||||
ASE_AWK_IMPLICIT |
|
||||
ASE_AWK_EXTIO |
|
||||
ASE_AWK_BLOCKLESS |
|
||||
ASE_AWK_BASEONE |
|
||||
@ -1153,36 +1151,6 @@ STDMETHODIMP CAwk::put_ExplicitVariable(VARIANT_BOOL newVal)
|
||||
return S_OK;
|
||||
}
|
||||
|
||||
STDMETHODIMP CAwk::get_UniqueFunction(VARIANT_BOOL *pVal)
|
||||
{
|
||||
if (handle != NULL) option = ase_awk_getoption (handle);
|
||||
*pVal = (option & ASE_AWK_UNIQUEFN) == 1;
|
||||
return S_OK;
|
||||
}
|
||||
|
||||
STDMETHODIMP CAwk::put_UniqueFunction(VARIANT_BOOL newVal)
|
||||
{
|
||||
if (newVal) option = option | ASE_AWK_UNIQUEFN;
|
||||
else option = option & ~ASE_AWK_UNIQUEFN;
|
||||
if (handle != NULL) ase_awk_setoption (handle, option);
|
||||
return S_OK;
|
||||
}
|
||||
|
||||
STDMETHODIMP CAwk::get_VariableShading(VARIANT_BOOL *pVal)
|
||||
{
|
||||
if (handle != NULL) option = ase_awk_getoption (handle);
|
||||
*pVal = (option & ASE_AWK_SHADING) == 1;
|
||||
return S_OK;
|
||||
}
|
||||
|
||||
STDMETHODIMP CAwk::put_VariableShading(VARIANT_BOOL newVal)
|
||||
{
|
||||
if (newVal) option = option | ASE_AWK_SHADING;
|
||||
else option = option & ~ASE_AWK_SHADING;
|
||||
if (handle != NULL) ase_awk_setoption (handle, option);
|
||||
return S_OK;
|
||||
}
|
||||
|
||||
STDMETHODIMP CAwk::get_ShiftOperators(VARIANT_BOOL *pVal)
|
||||
{
|
||||
if (handle != NULL) option = ase_awk_getoption (handle);
|
||||
|
@ -167,10 +167,6 @@ public:
|
||||
STDMETHOD(put_IdivOperator)(/*[in]*/ VARIANT_BOOL newVal);
|
||||
STDMETHOD(get_ShiftOperators)(/*[out, retval]*/ VARIANT_BOOL *pVal);
|
||||
STDMETHOD(put_ShiftOperators)(/*[in]*/ VARIANT_BOOL newVal);
|
||||
STDMETHOD(get_VariableShading)(/*[out, retval]*/ VARIANT_BOOL *pVal);
|
||||
STDMETHOD(put_VariableShading)(/*[in]*/ VARIANT_BOOL newVal);
|
||||
STDMETHOD(get_UniqueFunction)(/*[out, retval]*/ VARIANT_BOOL *pVal);
|
||||
STDMETHOD(put_UniqueFunction)(/*[in]*/ VARIANT_BOOL newVal);
|
||||
STDMETHOD(get_ExplicitVariable)(/*[out, retval]*/ VARIANT_BOOL *pVal);
|
||||
STDMETHOD(put_ExplicitVariable)(/*[in]*/ VARIANT_BOOL newVal);
|
||||
STDMETHOD(get_ImplicitVariable)(/*[out, retval]*/ VARIANT_BOOL *pVal);
|
||||
|
@ -62,16 +62,6 @@ interface IAwk : IDispatch
|
||||
[propput, id(14), helpstring("property ExplicitVariable")]
|
||||
HRESULT ExplicitVariable([in] VARIANT_BOOL newVal);
|
||||
|
||||
[propget, id(15), helpstring("property UniqueFunction")]
|
||||
HRESULT UniqueFunction([out,retval] VARIANT_BOOL *pVal);
|
||||
[propput, id(15), helpstring("property UniqueFunction")]
|
||||
HRESULT UniqueFunction([in] VARIANT_BOOL newVal);
|
||||
|
||||
[propget, id(16), helpstring("property VariableShading")]
|
||||
HRESULT VariableShading([out,retval] VARIANT_BOOL *pVal);
|
||||
[propput, id(16), helpstring("property VariableShading")]
|
||||
HRESULT VariableShading([in] VARIANT_BOOL newVal);
|
||||
|
||||
[propget, id(17), helpstring("property ShiftOperators")]
|
||||
HRESULT ShiftOperators([out,retval] VARIANT_BOOL *pVal);
|
||||
[propput, id(17), helpstring("property ShiftOperators")]
|
||||
|
Reference in New Issue
Block a user