|
|
@@ -7,7 +7,9 @@
|
|
|
#include <sqstdio.h>
|
|
|
#include <sqstdblob.h>
|
|
|
#include "sqstdstream.h"
|
|
|
-#include "sqstdblobimpl.h"
|
|
|
+#include "sqstdblobimpl.h"
|
|
|
+
|
|
|
+static const SQChar SQSTD_STREAM_TYPE_TAG[] = _SC("std_stream");
|
|
|
|
|
|
#define SETUP_STREAM(v) \
|
|
|
SQStream *self = NULL; \
|
|
|
@@ -342,14 +344,14 @@ static SQRegFunction _stream_methods[] = {
|
|
|
_DECL_STREAM_FUNC(flush,1,_SC("x")),
|
|
|
_DECL_STREAM_FUNC(_cloned,0,NULL),
|
|
|
{0,0}
|
|
|
-};
|
|
|
-
|
|
|
+};
|
|
|
+
|
|
|
void init_streamclass(HSQUIRRELVM v)
|
|
|
{
|
|
|
sq_pushregistrytable(v);
|
|
|
- sq_pushstring(v,_SC("std_stream"),-1);
|
|
|
+ sq_pushstring(v,SQSTD_STREAM_TYPE_TAG,-1);
|
|
|
if(SQ_FAILED(sq_get(v,-2))) {
|
|
|
- sq_pushstring(v,_SC("std_stream"),-1);
|
|
|
+ sq_pushstring(v,SQSTD_STREAM_TYPE_TAG,-1);
|
|
|
sq_newclass(v,SQFalse);
|
|
|
sq_settypetag(v,-1,(SQUserPointer)SQSTD_STREAM_TYPE_TAG);
|
|
|
SQInteger i = 0;
|