Begin work on core:sys/darwin/Foundation

2026-08-07 08:08:50 +00:00 · 2022-02-09 00:19:20 +00:00
parent 340838c878
commit b95ade40c0
13 changed files with 414 additions and 0 deletions
@@ -0,0 +1,45 @@
+package objc_Foundation
+
+@(objc_class="NSValue")
+Value :: struct{using _: Copying(Value)}
+
+
+@(objc_class="NSNumber")
+Number :: struct{using _: Copying(Number), using _: Value}
+
+
+Value_valueWithBytes :: proc(value: rawptr, type: cstring) -> ^Value {
+	return msgSend(^Value, Value, "valueWithBytes:objCType:", value, type)
+}
+
+Value_valueWithPointer :: proc(pointer: rawptr) -> ^Value {
+	return msgSend(^Value, Value, "valueWithPointer:", pointer)
+}
+
+Value_initWithBytes :: proc(value: rawptr, type: cstring) -> ^Value {
+	return msgSend(^Value, Value, "initWithBytes:objCType:", value, type)
+}
+
+Value_initWithCoder :: proc(coder: ^Coder) -> ^Value {
+	return msgSend(^Value, Value, "initWithCoder:", coder)
+}
+
+Value_getValue :: proc(self: ^Value, value: rawptr, size: UInteger) {
+	msgSend(nil, self, "getValue:size:", value, size)
+}
+
+
+Value_objCType :: proc(self: ^Value) -> cstring {
+	return msgSend(cstring, self, "objCType")
+}
+
+Value_isEqualToValue :: proc(self, other: ^Value) -> BOOL {
+	return msgSend(BOOL, self, "isEqualToValue:", other)
+}
+
+Value_pointerValue :: proc(self: ^Value) -> rawptr {
+	return msgSend(rawptr, self, "pointerValue")
+}
+
+
+// TODO(bill): Number methods