hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
hyung-hwan
2006-12-15 06:47:09 +00:00
parent b50cd52bbc
commit cc019d0416
6 changed files with 163 additions and 74 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
ase/com/Awk.cpp
View File

@ -1,5 +1,5 @@
/*
* $Id: Awk.cpp,v 1.8 2006-12-14 07:55:51 bacon Exp $
* $Id: Awk.cpp,v 1.9 2006-12-15 06:47:07 bacon Exp $
*/
#include "stdafx.h"
@ -43,14 +43,14 @@ CAwk::CAwk (): handle(NULL),
ASE_AWK_EXPLICIT |
ASE_AWK_UNIQUEAFN |
ASE_AWK_HASHSIGN |
/*ASE_AWK_IDIV |
ASE_AWK_IDIV |
ASE_AWK_SHADING |
ASE_AWK_SHIFT | */
ASE_AWK_EXTIO /*|
ASE_AWK_SHIFT |
ASE_AWK_EXTIO |
ASE_AWK_BLOCKLESS |
ASE_AWK_STRINDEXONE |
ASE_AWK_STRIPSPACES |
ASE_AWK_NEXTOFILE*/;
ASE_AWK_NEXTOFILE;
}
CAwk::~CAwk ()
@ -505,7 +505,7 @@ HRESULT CAwk::Run (int* ret)
ase_awk_runios_t runios;
runios.pipe = NULL;
runios.coproc = NULL;
runios.file = NULL;
runios.file = __process_extio;
runios.console = __process_extio;
runios.custom_data = this;

20
ase/com/AwkExtio.cpp
View File

@ -1,5 +1,5 @@
/*
* $Id: AwkExtio.cpp,v 1.6 2006-12-14 07:55:52 bacon Exp $
* $Id: AwkExtio.cpp,v 1.7 2006-12-15 06:47:08 bacon Exp $
*/
#include "stdafx.h"
@ -10,23 +10,25 @@
/////////////////////////////////////////////////////////////////////////////
// CAwkExtio
CAwkExtio::CAwkExtio (): name (NULL)/*, handle (NULL)*/
CAwkExtio::CAwkExtio (): name (NULL)
{
//#ifdef _DEBUG
#ifdef _DEBUG
TCHAR x[128];
_sntprintf (x, 128, _T("CAwkExtio::CAwkExtio %p"), this);
MessageBox (NULL, x, x, MB_OK);
//#endif
#endif
VariantInit (&handle);
}
CAwkExtio::~CAwkExtio ()
{
//#ifdef _DEBUG
#ifdef _DEBUG
TCHAR x[128];
_sntprintf (x, 128, _T("CAwkExtio::~CAwkExtio %p"), this);
MessageBox (NULL, x, x, MB_OK);
//#endif
#endif
if (name != NULL) SysFreeString (name);
VariantClear (&handle);
}
STDMETHODIMP CAwkExtio::get_Name (BSTR *pVal)
@ -35,7 +37,7 @@ STDMETHODIMP CAwkExtio::get_Name (BSTR *pVal)
else
{
BSTR tmp = SysAllocStringLen (name, SysStringLen(name));
if (tmp = NULL) return E_OUTOFMEMORY;
if (tmp == NULL) return E_OUTOFMEMORY;
*pVal = tmp;
}
@ -63,12 +65,14 @@ STDMETHODIMP CAwkExtio::get_Mode(int *pVal)
STDMETHODIMP CAwkExtio::get_Handle (VARIANT *pVal)
{
VariantClear (pVal);
VariantCopy (pVal, &handle);
return S_OK;
}
STDMETHODIMP CAwkExtio::put_Handle (VARIANT newVal)
{
handle.Copy (&newVal);
VariantClear (&handle);
VariantCopy (&handle, &newVal);
return S_OK;
}

4
ase/com/AwkExtio.h
View File

@ -1,5 +1,5 @@
/*
* $Id: AwkExtio.h,v 1.7 2006-12-11 14:58:25 bacon Exp $
* $Id: AwkExtio.h,v 1.8 2006-12-15 06:47:08 bacon Exp $
*/
#ifndef _ASE_COM_AWKEXTIO_H_
@ -19,7 +19,7 @@ public:
BSTR name;
int type;
int mode;
CComVariant handle;
VARIANT handle;
IBuffer* read_buf;
ase_size_t read_buf_pos;