remove imagepagerefs() acid function
This commit is contained in:
parent
d4d86df2ab
commit
3c41f98e0c
1 changed files with 0 additions and 14 deletions
|
@ -29,20 +29,6 @@ defn path(p) {
|
||||||
// print Image cache contents
|
// print Image cache contents
|
||||||
IHASHSIZE = 64;
|
IHASHSIZE = 64;
|
||||||
|
|
||||||
defn imagepagerefs(i) {
|
|
||||||
local p, n;
|
|
||||||
|
|
||||||
n = 0;
|
|
||||||
p = palloc.$tail;
|
|
||||||
while p != 0 && p.image != 0 do {
|
|
||||||
if p.image == i then {
|
|
||||||
n = n + 1;
|
|
||||||
}
|
|
||||||
p = p.prev;
|
|
||||||
}
|
|
||||||
return n;
|
|
||||||
}
|
|
||||||
|
|
||||||
defn imagecacheline(h) {
|
defn imagecacheline(h) {
|
||||||
local d, p, q;
|
local d, p, q;
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue