null 判断をシンプルに記述したい

[umemura]

NULLである可能性のあるクラスの中の、フィールドを、 NULL でないかどうかを判断する際に、
if-non-null をネストするのが面倒です。

ORBを利用すると、各フィールドはすべて Nullable になるため、
この問題は特に多く発生すると思います。

よい判断方法はありますでしょうか。

Code:

{define-class public Test
  field test-a:#String
  {constructor public {default
                          str:#String = null
                      }
    set self.test-a = str
  }
}

{CommandButton
    label = "NULL チェック",
    {on Action do
        let t:#Test  = null
        {if-non-null t then
            {if-non-null t.test-a then
                {popup-message "all-not-null"}
            }
        }
    }
}