diff options
Diffstat (limited to 'PerlTQt/TQt.xs')
| -rw-r--r-- | PerlTQt/TQt.xs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/PerlTQt/TQt.xs b/PerlTQt/TQt.xs index 22a66de..5408d0b 100644 --- a/PerlTQt/TQt.xs +++ b/PerlTQt/TQt.xs @@ -442,7 +442,7 @@ public: static_TQUType_int.set(po, si->s_int); break; case xmoc_double: - static_TQUType_double.set(po, si->s_double); + static_QUType_double.set(po, si->s_double); break; case xmoc_charstar: static_TQUType_charstar.set(po, (char*)si->s_voidp); @@ -567,7 +567,7 @@ public: _stack[i].s_int = static_TQUType_int.get(o); break; case xmoc_double: - _stack[i].s_double = static_TQUType_double.get(o); + _stack[i].s_double = static_QUType_double.get(o); break; case xmoc_charstar: _stack[i].s_voidp = static_TQUType_charstar.get(o); @@ -1638,7 +1638,7 @@ make_TQUParameter(name, type, extra, inout) else if(!strcmp(type, "int")) p->type = &static_TQUType_int; else if(!strcmp(type, "double")) - p->type = &static_TQUType_double; + p->type = &static_QUType_double; else if(!strcmp(type, "char*") || !strcmp(type, "const char*")) p->type = &static_TQUType_charstar; else if(!strcmp(type, "TQString") || !strcmp(type, "TQString&") || |