alias count.aliases {
var %x = 1,%z = 0
while (%x <= $lines($1)) {
if ($gettok($read($1,%x),1,32) == alias) { inc %z }
inc %x
}
return %z
}$count.aliases(path\to\file.mrc) should return the number of aliases, but it doesnt. After some debugging ive noticed it's only gettting to the first 3 lines of the file, even though it has 80 some lines. Any ideas? Also, if anyone knows of a faster way to do this, please let me know. Thanks...
Austin
