/usr/share/yacas/include/arrayclass.inl is in yacas 1.3.3-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | inline LispInt ArrayClass::Size()
{
return iArray.Size();
}
inline LispObject* ArrayClass::GetElement(LispInt aItem)
{
LISPASSERT(aItem>0 && aItem<=iArray.Size());
//LISPASSERT(aItem-1>=0 && aItem-1<iArray.Size());
return iArray[aItem-1];
}
inline void ArrayClass::SetElement(LispInt aItem,LispObject* aObject)
{
LISPASSERT(aItem>0 && aItem<=iArray.Size());
//LISPASSERT(aItem-1>=0 && aItem-1<iArray.Size());
iArray[aItem-1] = (aObject);
}
|