2 * Copyright (C) 1999-2000 Harri Porten (porten@kde.org)
3 * Copyright (C) 2003, 2008 Apple Inc. All rights reserved.
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22 #include "NativeErrorConstructor.h"
24 #include "ErrorInstance.h"
25 #include "JSFunction.h"
27 #include "NativeErrorPrototype.h"
31 ASSERT_CLASS_FITS_IN_CELL(NativeErrorConstructor
);
33 const ClassInfo
NativeErrorConstructor::s_info
= { "Function", &InternalFunction::s_info
, 0, 0 };
35 NativeErrorConstructor::NativeErrorConstructor(ExecState
* exec
, JSGlobalObject
* globalObject
, Structure
* structure
, Structure
* prototypeStructure
, const UString
& nameAndMessage
)
36 : InternalFunction(&exec
->globalData(), globalObject
, structure
, Identifier(exec
, nameAndMessage
))
38 ASSERT(inherits(&s_info
));
40 NativeErrorPrototype
* prototype
= new (exec
) NativeErrorPrototype(exec
, globalObject
, prototypeStructure
, nameAndMessage
, this);
42 putDirect(exec
->globalData(), exec
->propertyNames().length
, jsNumber(1), DontDelete
| ReadOnly
| DontEnum
); // ECMA 15.11.7.5
43 putDirect(exec
->globalData(), exec
->propertyNames().prototype
, prototype
, DontDelete
| ReadOnly
| DontEnum
);
44 m_errorStructure
.set(exec
->globalData(), this, ErrorInstance::createStructure(exec
->globalData(), prototype
));
45 ASSERT(m_errorStructure
);
46 ASSERT(m_errorStructure
->typeInfo().type() == ObjectType
);
49 void NativeErrorConstructor::visitChildren(SlotVisitor
& visitor
)
51 ASSERT_GC_OBJECT_INHERITS(this, &s_info
);
52 COMPILE_ASSERT(StructureFlags
& OverridesVisitChildren
, OverridesVisitChildrenWithoutSettingFlag
);
53 ASSERT(structure()->typeInfo().overridesVisitChildren());
54 InternalFunction::visitChildren(visitor
);
56 visitor
.append(&m_errorStructure
);
59 static EncodedJSValue JSC_HOST_CALL
constructWithNativeErrorConstructor(ExecState
* exec
)
61 JSValue message
= exec
->argumentCount() ? exec
->argument(0) : jsUndefined();
62 Structure
* errorStructure
= static_cast<NativeErrorConstructor
*>(exec
->callee())->errorStructure();
63 ASSERT(errorStructure
);
64 return JSValue::encode(ErrorInstance::create(exec
, errorStructure
, message
));
67 ConstructType
NativeErrorConstructor::getConstructData(ConstructData
& constructData
)
69 constructData
.native
.function
= constructWithNativeErrorConstructor
;
70 return ConstructTypeHost
;
73 static EncodedJSValue JSC_HOST_CALL
callNativeErrorConstructor(ExecState
* exec
)
75 JSValue message
= exec
->argumentCount() ? exec
->argument(0) : jsUndefined();
76 Structure
* errorStructure
= static_cast<NativeErrorConstructor
*>(exec
->callee())->errorStructure();
77 return JSValue::encode(ErrorInstance::create(exec
, errorStructure
, message
));
80 CallType
NativeErrorConstructor::getCallData(CallData
& callData
)
82 callData
.native
.function
= callNativeErrorConstructor
;