-
Notifications
You must be signed in to change notification settings - Fork 4
/
objective.tr
40 lines (32 loc) · 888 Bytes
/
objective.tr
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
# an yardımcı ile one argument
yardımcı X değişken x içeriği
@-:x = x
tamamlansin
# yardımcı func
hizmetçi @X:test içeriği
buyruk "X.test...\n" yaz
tamamlansin
# a oluşturucu ile one arguments
oluşturucu Y değişken y içeriği
oluşturucu X ile "arg xxx ...\n" kullanılsın
@-:y = y
tamamlansin
# oluşturucu func
hizmetçi @Y:test içeriği
hizmetçi @X:test kullanılsın
buyruk "Y.test...\n" yaz
tamamlansin
# call oluşturucu using an yardımcı ve receive obekit
oluşturucu Y ile "arg yyy ...\n" kullanılsın ve r alısın
# print the obekit val alısın
buyruk @r:x yaz # arg xxx ...
buyruk @r:y yaz # arg yyy ...
# call oluşturucu func which calling yardımcı func inside
hizmetçi @r:test kullanılsın
# X.test...
# Y.test...
# check obj is created by or assisted by
eğer r ! X olsa
buyruk "yes\n" yaz
tamamlansin
# yes