R3 Alpha 99セッションを起動し、これを最初のコマンドとして入力すると、エラーが発生します。
>> is-email-addr: get bind to-word "email?" bind? 'system
** Script error: email? is not in the specified context
** Where: bind
** Near: bind to-word "email?" bind? 'system
email?
しかし、終了して再起動し、代わりにテストを実行して、プリミティブがオブジェクトのようなグローバルコンテキストに存在することを証明するとsystem
、テスト自体によってエイリアスが機能します。
>> equal? bind? 'system bind? 'email?
== true
>> is-email-addr: get bind to-word "email?" bind? 'system
>> is-email-addr fork@example.com
== true
何が起きてる?