From 014fc109ee6bfc2c8b369c7a31058542dfa4ffb5 Mon Sep 17 00:00:00 2001 From: Arvydas Silanskas Date: Fri, 13 Dec 2024 23:08:49 +0200 Subject: [PATCH] fix --- .../github/arvyy/islisp/functions/ISLISPClassSlotBoundp.java | 2 +- .../github/arvyy/islisp/functions/ISLISPClassSlotReader.java | 2 +- .../github/arvyy/islisp/functions/ISLISPClassSlotWriter.java | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotBoundp.java b/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotBoundp.java index aa8e60a..ea22f19 100644 --- a/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotBoundp.java +++ b/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotBoundp.java @@ -62,7 +62,7 @@ Object doUnspecialized(StandardClassObject clsObject) { @CompilerDirectives.TruffleBoundary StaticProperty lookupProperty(StandardClass clazz) { for (var classSlot: clazz.slots()) { - if (classSlot.name().equals(slot.identityReference())) { + if (classSlot.name().equals(slot)) { return classSlot.property(); } } diff --git a/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotReader.java b/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotReader.java index 77e3d15..7c26095 100644 --- a/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotReader.java +++ b/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotReader.java @@ -59,7 +59,7 @@ Object doUnspecialized(StandardClassObject clsObject) { @CompilerDirectives.TruffleBoundary StaticProperty lookupProperty(StandardClass clazz) { for (var classSlot: clazz.slots()) { - if (classSlot.name().equals(slot.identityReference())) { + if (classSlot.name().equals(slot)) { return classSlot.property(); } } diff --git a/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotWriter.java b/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotWriter.java index 0e3600c..3880986 100644 --- a/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotWriter.java +++ b/language/src/main/java/com/github/arvyy/islisp/functions/ISLISPClassSlotWriter.java @@ -59,7 +59,7 @@ Object doUnspecialized(Object value, StandardClassObject clsObject) { @CompilerDirectives.TruffleBoundary StaticProperty lookupProperty(StandardClass clazz) { for (var classSlot: clazz.slots()) { - if (classSlot.name().equals(slot.identityReference())) { + if (classSlot.name().equals(slot)) { return classSlot.property(); } }