| 1 | /****************************************************************************
|
|---|
| 2 | **
|
|---|
| 3 | ** Copyright (C) 2009 Nokia Corporation and/or its subsidiary(-ies).
|
|---|
| 4 | ** Contact: Qt Software Information (qt-info@nokia.com)
|
|---|
| 5 | **
|
|---|
| 6 | ** This file is part of the QtScript module of the Qt Toolkit.
|
|---|
| 7 | **
|
|---|
| 8 | ** $QT_BEGIN_LICENSE:LGPL$
|
|---|
| 9 | ** Commercial Usage
|
|---|
| 10 | ** Licensees holding valid Qt Commercial licenses may use this file in
|
|---|
| 11 | ** accordance with the Qt Commercial License Agreement provided with the
|
|---|
| 12 | ** Software or, alternatively, in accordance with the terms contained in
|
|---|
| 13 | ** a written agreement between you and Nokia.
|
|---|
| 14 | **
|
|---|
| 15 | ** GNU Lesser General Public License Usage
|
|---|
| 16 | ** Alternatively, this file may be used under the terms of the GNU Lesser
|
|---|
| 17 | ** General Public License version 2.1 as published by the Free Software
|
|---|
| 18 | ** Foundation and appearing in the file LICENSE.LGPL included in the
|
|---|
| 19 | ** packaging of this file. Please review the following information to
|
|---|
| 20 | ** ensure the GNU Lesser General Public License version 2.1 requirements
|
|---|
| 21 | ** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
|
|---|
| 22 | **
|
|---|
| 23 | ** In addition, as a special exception, Nokia gives you certain
|
|---|
| 24 | ** additional rights. These rights are described in the Nokia Qt LGPL
|
|---|
| 25 | ** Exception version 1.0, included in the file LGPL_EXCEPTION.txt in this
|
|---|
| 26 | ** package.
|
|---|
| 27 | **
|
|---|
| 28 | ** GNU General Public License Usage
|
|---|
| 29 | ** Alternatively, this file may be used under the terms of the GNU
|
|---|
| 30 | ** General Public License version 3.0 as published by the Free Software
|
|---|
| 31 | ** Foundation and appearing in the file LICENSE.GPL included in the
|
|---|
| 32 | ** packaging of this file. Please review the following information to
|
|---|
| 33 | ** ensure the GNU General Public License version 3.0 requirements will be
|
|---|
| 34 | ** met: http://www.gnu.org/copyleft/gpl.html.
|
|---|
| 35 | **
|
|---|
| 36 | ** If you are unsure which license is appropriate for your use, please
|
|---|
| 37 | ** contact the sales department at qt-sales@nokia.com.
|
|---|
| 38 | ** $QT_END_LICENSE$
|
|---|
| 39 | **
|
|---|
| 40 | ****************************************************************************/
|
|---|
| 41 |
|
|---|
| 42 | #include <QtCore/QTextStream>
|
|---|
| 43 |
|
|---|
| 44 | #ifndef QT_NO_SCRIPT
|
|---|
| 45 |
|
|---|
| 46 | #include "qscriptasm_p.h"
|
|---|
| 47 | #include "qscriptvalueimpl_p.h"
|
|---|
| 48 | #include "qscriptengine_p.h"
|
|---|
| 49 | #include "qscriptcontext_p.h"
|
|---|
| 50 | #include "qscriptmember_p.h"
|
|---|
| 51 | #include "qscriptobject_p.h"
|
|---|
| 52 |
|
|---|
| 53 | QT_BEGIN_NAMESPACE
|
|---|
| 54 |
|
|---|
| 55 | const char *QScriptInstruction::opcode[] = {
|
|---|
| 56 | #define STR(a) #a
|
|---|
| 57 | #define Q_SCRIPT_DEFINE_OPERATOR(op) STR(i##op) ,
|
|---|
| 58 | #include "instruction.table"
|
|---|
| 59 | #undef Q_SCRIPT_DEFINE_OPERATOR
|
|---|
| 60 | #undef STR
|
|---|
| 61 | };
|
|---|
| 62 |
|
|---|
| 63 | void QScriptInstruction::print(QTextStream &out) const
|
|---|
| 64 | {
|
|---|
| 65 | out << opcode[op];
|
|---|
| 66 |
|
|---|
| 67 | if (! operand[0].isValid())
|
|---|
| 68 | return;
|
|---|
| 69 |
|
|---|
| 70 | out << '(' << operand[0].toString();
|
|---|
| 71 |
|
|---|
| 72 | if (operand[1].isValid())
|
|---|
| 73 | out << ", " << operand[1].toString();
|
|---|
| 74 |
|
|---|
| 75 | out << ')';
|
|---|
| 76 | }
|
|---|
| 77 |
|
|---|
| 78 | namespace QScript {
|
|---|
| 79 |
|
|---|
| 80 | Code::Code():
|
|---|
| 81 | optimized(false),
|
|---|
| 82 | firstInstruction(0),
|
|---|
| 83 | lastInstruction(0),
|
|---|
| 84 | astPool(0)
|
|---|
| 85 | {
|
|---|
| 86 | }
|
|---|
| 87 |
|
|---|
| 88 | Code::~Code()
|
|---|
| 89 | {
|
|---|
| 90 | delete[] firstInstruction;
|
|---|
| 91 | }
|
|---|
| 92 |
|
|---|
| 93 | void Code::init(const CompilationUnit &compilation, NodePool *pool)
|
|---|
| 94 | {
|
|---|
| 95 | optimized = false;
|
|---|
| 96 | const QVector<QScriptInstruction> ilist = compilation.instructions();
|
|---|
| 97 | firstInstruction = new QScriptInstruction[ilist.count()];
|
|---|
| 98 | lastInstruction = firstInstruction + ilist.count();
|
|---|
| 99 | qCopy(ilist.begin(), ilist.end(), firstInstruction);
|
|---|
| 100 | exceptionHandlers = compilation.exceptionHandlers();
|
|---|
| 101 | astPool = pool;
|
|---|
| 102 | }
|
|---|
| 103 |
|
|---|
| 104 | } // namespace QScript
|
|---|
| 105 |
|
|---|
| 106 | QT_END_NAMESPACE
|
|---|
| 107 |
|
|---|
| 108 | #endif // QT_NO_SCRIPT
|
|---|