1/* 2 * Copyright (C) 1999-2000 Harri Porten (porten@kde.org) 3 * Copyright (C) 2003, 2008 Apple Inc. All rights reserved. 4 * 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. 9 * 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. 14 * 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 18 * 19 */ 20 21#include "config.h" 22#include "NativeErrorConstructor.h" 23 24#include "ErrorInstance.h" 25#include "JSFunction.h" 26#include "JSString.h" 27#include "NativeErrorPrototype.h" 28 29namespace JSC { 30 31ASSERT_CLASS_FITS_IN_CELL(NativeErrorConstructor); 32 33const ClassInfo NativeErrorConstructor::info = { "Function", &InternalFunction::info, 0, 0 }; 34 35NativeErrorConstructor::NativeErrorConstructor(ExecState* exec, NonNullPassRefPtr<Structure> structure, NativeErrorPrototype* nativeErrorPrototype) 36 : InternalFunction(&exec->globalData(), structure, Identifier(exec, nativeErrorPrototype->getDirect(exec->propertyNames().name).getString(exec))) 37 , m_errorStructure(ErrorInstance::createStructure(nativeErrorPrototype)) 38{ 39 putDirect(exec->propertyNames().length, jsNumber(exec, 1), DontDelete | ReadOnly | DontEnum); // ECMA 15.11.7.5 40 putDirect(exec->propertyNames().prototype, nativeErrorPrototype, DontDelete | ReadOnly | DontEnum); 41} 42 43ErrorInstance* NativeErrorConstructor::construct(ExecState* exec, const ArgList& args) 44{ 45 ErrorInstance* object = new (exec) ErrorInstance(m_errorStructure); 46 if (!args.at(0).isUndefined()) 47 object->putDirect(exec->propertyNames().message, jsString(exec, args.at(0).toString(exec))); 48 return object; 49} 50 51static JSObject* constructWithNativeErrorConstructor(ExecState* exec, JSObject* constructor, const ArgList& args) 52{ 53 return static_cast<NativeErrorConstructor*>(constructor)->construct(exec, args); 54} 55 56ConstructType NativeErrorConstructor::getConstructData(ConstructData& constructData) 57{ 58 constructData.native.function = constructWithNativeErrorConstructor; 59 return ConstructTypeHost; 60} 61 62static JSValue JSC_HOST_CALL callNativeErrorConstructor(ExecState* exec, JSObject* constructor, JSValue, const ArgList& args) 63{ 64 return static_cast<NativeErrorConstructor*>(constructor)->construct(exec, args); 65} 66 67CallType NativeErrorConstructor::getCallData(CallData& callData) 68{ 69 callData.native.function = callNativeErrorConstructor; 70 return CallTypeHost; 71} 72 73} // namespace JSC 74