remove _ in names
This commit is contained in:
parent
829db87c40
commit
3af7344581
1270 changed files with 0 additions and 18916 deletions
|
|
@ -1,21 +0,0 @@
|
|||
class CLASSTEST is
|
||||
readonly attr x:INT; -- give a public getter, not a setter
|
||||
private attr y:INT; -- no getter, no setter
|
||||
attr z:INT; -- getter and setter
|
||||
|
||||
-- constructor
|
||||
create(x, y, z:INT):CLASSTEST is
|
||||
res :CLASSTEST := new; -- or res ::= new
|
||||
res.x := x;
|
||||
res.y := y;
|
||||
res.z := z;
|
||||
return res;
|
||||
end;
|
||||
|
||||
-- a getter for the private y summed to s
|
||||
getPrivateY(s:INT):INT is
|
||||
-- y is not shadowed so we can write y instead of
|
||||
-- self.y
|
||||
return y + s;
|
||||
end;
|
||||
end;
|
||||
Loading…
Add table
Add a link
Reference in a new issue