具体来说,有没有办法让任务获得对自身的引用?
例如:
task type someTask; type someTaskAccessor is access someTask; task body someTask is pointerToTask : someTaskAccessor; begin pointerToTask = this; end someTask;
ada this
ada ×1
this ×1