source: liacs/coco/tests/simple/correct9.p0@ 196

Last change on this file since 196 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: 172 bytes
Line 
1program donald;
2
3var
4 fred, barney: integer;
5
6procedure kwak(katrien: real; dagobert: integer);
7
8begin
9end;
10
11begin
12 { integer to real coercion }
13 kwak(fred,barney)
14end.
Note: See TracBrowser for help on using the repository browser.