Added in 2.4
$calias
Returns the calling alias for the current script,
alias test1 {
  echo -ag Calling alias is $calias
  noop $test2
}
alias test2 {
  echo -ag Calling alias is still $calias
  noop $test3
}
alias test3 {
  echo -ag Calling alias is still $calias
}
Added in 2.7
$calias(N)
Returns the Nth calling alias in the scripting stack.
Parameters
N - The Nth calling alias.
Properties
.alias - Returns the name of the alias.
.fname - Returns the filename of the script calling the alias.
.line - Returns the line in the script calling the alias.
.isid - Returns $true if the alias was called as a identifier, otherwise $false.
Example
alias alias1 {
  alias2
}
alias alias2 {
  noop $alias3
}
alias alias3 {
  var %s 0
  while (%s < $calias(0)) {
    inc %s
    linesep
    var %alias $calias(%s).alias
    echo -ag alias = %alias
    echo -ag calling filename = $calias(%s).fname
    echo -ag caling line = $calias(%s).line
    echo -ag isid = $calias(%s).isid
    if ($isalias(%alias)) {
      echo -ag alias filename = $isalias(%alias).fname
      echo -ag alias line = $isalias(%alias).fline
      echo -ag alias type = $isalias(%alias).ftype
    }
    linesep
  }
}