mirror of
https://git.tesses.org/tesses50/crosslang.git
synced 2026-09-30 08:44:14 +00:00
77 lines
2.3 KiB
C++
77 lines
2.3 KiB
C++
/*
|
|
CrossLang is a dynamically-typed scripting language built on
|
|
TessesFramework, named in honor of Jesus's sacrifice.
|
|
|
|
Copyright (C) 2026 Mike Nolan
|
|
SPDX-License-Identifier: GPL-3.0-or-later WITH TessesFramework-Exception-1.0
|
|
|
|
This program is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <https://www.gnu.org/licenses/>.
|
|
*/
|
|
#include "CrossLang.hpp"
|
|
|
|
namespace Tesses::CrossLang {
|
|
GCList::GCList(std::shared_ptr<GC> gc) {
|
|
gc->BarrierBegin();
|
|
this->gc = gc;
|
|
gc->SetRoot(this);
|
|
gc->BarrierEnd();
|
|
}
|
|
|
|
std::shared_ptr<GC> GCList::GetGC() const { return this->gc; }
|
|
void GCList::Remove(TObject obj) {
|
|
if (std::holds_alternative<THeapObject *>(obj)) {
|
|
auto _item = std::get<THeapObject *>(obj);
|
|
if (_item == nullptr)
|
|
return;
|
|
this->gc->BarrierBegin();
|
|
for (auto index = this->items.begin(); index != this->items.end();
|
|
index++) {
|
|
if (*index == _item) {
|
|
this->items.erase(index);
|
|
continue;
|
|
}
|
|
}
|
|
this->gc->BarrierEnd();
|
|
}
|
|
}
|
|
void GCList::Add(TObject obj) {
|
|
|
|
if (std::holds_alternative<THeapObject *>(obj)) {
|
|
auto _item = std::get<THeapObject *>(obj);
|
|
if (_item == nullptr)
|
|
return;
|
|
this->gc->BarrierBegin();
|
|
|
|
for (auto item : this->items) {
|
|
if (item == _item) {
|
|
this->gc->BarrierEnd();
|
|
return;
|
|
}
|
|
}
|
|
this->items.push_back(_item);
|
|
this->gc->BarrierEnd();
|
|
}
|
|
}
|
|
void GCList::Mark() {
|
|
for (auto item : this->items) {
|
|
item->Mark();
|
|
}
|
|
}
|
|
GCList::~GCList() {
|
|
gc->BarrierBegin();
|
|
this->gc->UnsetRoot(this);
|
|
gc->BarrierEnd();
|
|
}
|
|
} // namespace Tesses::CrossLang
|