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-12 05:54:33 +00:00
parent 88a6abd818
commit c499cb13f2
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ase/com/AwkExtio.cpp
View File

@ -1,5 +1,5 @@
/* /*
* $Id: AwkExtio.cpp,v 1.4 2006-12-11 14:58:25 bacon Exp $ * $Id: AwkExtio.cpp,v 1.5 2006-12-12 05:54:33 bacon Exp $
*/ */
#include "stdafx.h" #include "stdafx.h"
@ -63,7 +63,7 @@ STDMETHODIMP CAwkExtio::get_Mode(int *pVal)
STDMETHODIMP CAwkExtio::get_Handle (VARIANT *pVal) STDMETHODIMP CAwkExtio::get_Handle (VARIANT *pVal)
{ {
*pVal = handle; VariantCopy (pVal, &handle);
return S_OK; return S_OK;
} }

2
ase/test/com/AwkForm.frm
View File

@ -215,7 +215,7 @@ Function Awk_ReadExtio(ByVal extio As ASELib.AwkExtio, ByVal buf As ASELib.Buffe
Exit Function Exit Function
End If End If
Let console = extio.Handle Set console = extio.Handle
If console.Count = 0 Then If console.Count = 0 Then
value = ConsoleIn.Text value = ConsoleIn.Text
l = Len(value) l = Len(value)