overriding_ops_p.ads
来自「用于进行gcc测试」· ADS 代码 · 共 9 行
ADS
9 行
package overriding_ops_p is subtype Name_Type is String (1 .. 30); type Device is synchronized interface; -- Base type of devices procedure Set_Name (Object : in out Device; Name : Name_Type) is abstract; -- Set the name of the Deviceend overriding_ops_p;
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?