spielwiese
Last change
on this file since b7d0a9c was
42ea852,
checked in by Oleksandr Motsak <motsak@…>, 11 years ago
|
Further incompatibilities with master!
chg: Update 14.Jan.2013 (Tests regeneration/update due to master...)
TODO: still missing commits from [master] (Interpreter...10912c588c406e6aab9dd2342c3d0c200096cb22 4b8a660ce83e9c109ec9eae1f413ab721fea2fd4)
|
-
Property mode set to
100644
|
File size:
324 bytes
|
Rev | Line | |
---|
[42ea852] | 1 | LIB "tst.lib"; |
---|
| 2 | tst_init(); |
---|
| 3 | |
---|
| 4 | proc probe(alias list args) |
---|
| 5 | { |
---|
| 6 | args; |
---|
| 7 | typeof(args); |
---|
| 8 | int i = size(args[1]); |
---|
| 9 | } |
---|
| 10 | |
---|
| 11 | ring r = 0, x, dp; |
---|
| 12 | ideal i = x; |
---|
| 13 | list l = list(i, 2); |
---|
| 14 | |
---|
| 15 | probe(l); |
---|
| 16 | |
---|
| 17 | proc probe2(alias list i) { i; }; |
---|
| 18 | |
---|
| 19 | list n = 1; |
---|
| 20 | probe2(n); |
---|
| 21 | |
---|
| 22 | proc probe3(alias int i) { i;listvar(); }; |
---|
| 23 | |
---|
| 24 | int j=2; |
---|
| 25 | probe3(j); |
---|
| 26 | |
---|
| 27 | probe3(1+2); |
---|
| 28 | |
---|
| 29 | tst_status(1);$ |
---|
| 30 | |
---|
Note: See
TracBrowser
for help on using the repository browser.