Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-23 20:15:05 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Very small speedup - fixnums for vector access

Browse source
This commit is contained in:
Justin Ethier 2018-08-20 13:36:33 -04:00
parent 317c6fe2be
commit bb4b136b00
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
runtime.c
View file

@ -1765,7 +1765,7 @@ object Cyc_vector_set(void *data, object v, object k, object obj)
{
int idx;
Cyc_check_vec(data, v);
Cyc_check_num(data, k);
Cyc_check_fixnum(data, k);
idx = unbox_number(k);
if (idx < 0 || idx >= ((vector) v)->num_elements) {
@ -1783,7 +1783,7 @@ object Cyc_vector_ref(void *data, object v, object k)
{
int idx;
Cyc_check_vec(data, v);
Cyc_check_num(data, k);
Cyc_check_fixnum(data, k);
idx = unbox_number(k);
if (idx < 0 || idx >= ((vector) v)->num_elements) {