diff options
Diffstat (limited to 'src/library.c')
| -rw-r--r-- | src/library.c | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/src/library.c b/src/library.c index 9a40646..5b04e51 100644 --- a/src/library.c +++ b/src/library.c @@ -325,13 +325,7 @@ void pit_install_library_io(pit_runtime *rt) { static pit_value impl_plist_get(pit_runtime *rt, pit_value args) { pit_value k = pit_car(rt, args); pit_value vs = pit_car(rt, pit_cdr(rt, args)); - while (vs != PIT_NIL) { - if (pit_eq(k, pit_car(rt, vs))) { - return pit_car(rt, pit_cdr(rt, vs)); - } - vs = pit_cdr(rt, vs); - } - return PIT_NIL; + return pit_plist_get(rt, k, vs); } void pit_install_library_plist(pit_runtime *rt) { /* property lists / keyword arguments */ |