projects
/
muddle-interpreter.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Implement NTH.
[muddle-interpreter.git]
/
src
/
object.c
diff --git
a/src/object.c
b/src/object.c
index af50edaa191905c920704fc29af899f3117bbc08..5b115c0b89ffbcfc78c5b9e249f8488d573aa25d 100644
(file)
--- a/
src/object.c
+++ b/
src/object.c
@@
-99,3
+99,10
@@
stack_push (vector_object * v)
v->val.len++;
return HEAP_OBJECT (--(v->val.body));
}
+
+object
+uv_get (const uvector_object * o, uint32_t i)
+{
+ return (object)
+ {.type = utype (o),.uv_val = UV_VAL (o->val.body)[i]};
+}