hyung-hwan/hcl
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

changed ::: to :: to indicate class variables, parent class, retvar
All checks were successful
continuous-integration/drone/push Build is passing
Details

Browse Source
This commit is contained in:
hyung-hwan
2024-02-04 01:57:53 +09:00
parent b20d6b14d8
commit 48e6df233b
17 changed files with 59 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
t/retvar-01.hcl
View File

@ -6,7 +6,7 @@
set i 100;
defun ff(a b ::: x y z) {
defun ff(a b :: x y z) {
set x (+ a b i);
set y (+ x x);
set z (+ 999 i);
@ -29,17 +29,17 @@
## test return variables in message sends
defclass B ::: | X1 X2 | {
defclass B :: | X1 X2 | {
set X1 999;
set X2 888;
defun ::: get ( ::: x y) {
defun :: get ( :: x y) {
set x X1;
set y X2;
};
defun ::: get2 (inc ::: x y) {
defun :: get2 (inc :: x y) {
set x (+ X1 inc);
set y (+ X2 inc);
};