steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

removed global functions from arrays.cpp

db4
Phil Dawes 2009-08-17 21:37:17 +01:00
parent 5a0c4d18aa
commit d21b1b2e1e
3 changed files with 1 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
vm/arrays.cpp
View File

@ -23,10 +23,6 @@ array *factorvm::allot_array(cell capacity, cell fill_)
return new_array.untagged(); return new_array.untagged();
} }
array *allot_array(cell capacity, cell fill_)
{
return vm->allot_array(capacity,fill_);
}
/* push a new array on the stack */ /* push a new array on the stack */
inline void factorvm::vmprim_array() inline void factorvm::vmprim_array()
@ -49,10 +45,6 @@ cell factorvm::allot_array_1(cell obj_)
return a.value(); return a.value();
} }
cell allot_array_1(cell obj_)
{
return vm->allot_array_1(obj_);
}
cell factorvm::allot_array_2(cell v1_, cell v2_) cell factorvm::allot_array_2(cell v1_, cell v2_)
{ {
@ -64,10 +56,6 @@ cell factorvm::allot_array_2(cell v1_, cell v2_)
return a.value(); return a.value();
} }
cell allot_array_2(cell v1_, cell v2_)
{
return vm->allot_array_2(v1_,v2_);
}
cell factorvm::allot_array_4(cell v1_, cell v2_, cell v3_, cell v4_) cell factorvm::allot_array_4(cell v1_, cell v2_, cell v3_, cell v4_)
{ {
@ -83,10 +71,6 @@ cell factorvm::allot_array_4(cell v1_, cell v2_, cell v3_, cell v4_)
return a.value(); return a.value();
} }
cell allot_array_4(cell v1_, cell v2_, cell v3_, cell v4_)
{
return vm->allot_array_4(v1_,v2_,v3_,v4_);
}
inline void factorvm::vmprim_resize_array() inline void factorvm::vmprim_resize_array()
{ {

10
vm/arrays.hpp
View File

@ -10,16 +10,6 @@ inline cell array_nth(array *array, cell slot)
return array->data()[slot]; return array->data()[slot];
} }
array *allot_array(cell capacity, cell fill);
cell allot_array_1(cell obj);
cell allot_array_2(cell v1, cell v2);
cell allot_array_4(cell v1, cell v2, cell v3, cell v4);
PRIMITIVE(array); PRIMITIVE(array);
PRIMITIVE(resize_array); PRIMITIVE(resize_array);

2
vm/inlineimpls.hpp
View File

@ -347,7 +347,7 @@ struct growable_array {
cell count; cell count;
gc_root<array> elements; gc_root<array> elements;
growable_array(factorvm *myvm, cell capacity = 10) : count(0), elements(allot_array(capacity,F),myvm) {} growable_array(factorvm *myvm, cell capacity = 10) : count(0), elements(myvm->allot_array(capacity,F),myvm) {}
void add(cell elt); void add(cell elt);
void trim(); void trim();