LibJS: Start implementing Intl Segments objects

Userland/Libraries/LibJS/Runtime/Intl/Segments.cpp

@@ -0,0 +1,38 @@
+/*
+ * Copyright (c) 2022, Idan Horowitz <idan.horowitz@serenityos.org>
+ *
+ * SPDX-License-Identifier: BSD-2-Clause
+ */
+
+#include <LibJS/Runtime/GlobalObject.h>
+#include <LibJS/Runtime/Intl/Segments.h>
+#include <LibJS/Runtime/Intl/SegmentsPrototype.h>
+
+namespace JS::Intl {
+
+// 18.5.1 CreateSegmentsObject ( segmenter, string ), https://tc39.es/ecma402/#sec-createsegmentsobject
+Segments* Segments::create(GlobalObject& global_object, Segmenter& segmenter, String string)
+{
+    // 1. Let internalSlotsList be « [[SegmentsSegmenter]], [[SegmentsString]] ».
+    // 2. Let segments be ! OrdinaryObjectCreate(%SegmentsPrototype%, internalSlotsList).
+    // 3. Set segments.[[SegmentsSegmenter]] to segmenter.
+    // 4. Set segments.[[SegmentsString]] to string.
+    // 5. Return segments.
+    return global_object.heap().allocate<Segments>(global_object, global_object, segmenter, move(string));
+}
+
+// 18.5 Segments Objects, https://tc39.es/ecma402/#sec-segments-objects
+Segments::Segments(GlobalObject& global_object, Segmenter& segmenter, String string)
+    : Object(*global_object.intl_segments_prototype())
+    , m_segments_segmenter(segmenter)
+    , m_segments_string(move(string))
+{
+}
+
+void Segments::visit_edges(Cell::Visitor& visitor)
+{
+    Base::visit_edges(visitor);
+    visitor.visit(&m_segments_segmenter);
+}
+
+}