source: liacs/coco/tests/calls/result_discarded.p1@ 160

Last change on this file since 160 was 2, checked in by Rick van der Zwet, 15 years ago

Initial import of data of old repository ('data') worth keeping (e.g. tracking
means of URL access statistics)

File size: 208 bytes
RevLine 
[2]1{ in C the result of function can be discarded (e.g. often used with printf),
2 this is not allowed in pascal }
3
4program snafu;
5
6function fun(a: integer): integer;
7
8begin
9 a := 3
10end;
11
12begin
13 fun(42)
14end.
Note: See TracBrowser for help on using the repository browser.