Add Coral 66 (#959)
This commit is contained in:
10
c/Coral 66.cor
Normal file
10
c/Coral 66.cor
Normal file
@@ -0,0 +1,10 @@
|
||||
'external' (
|
||||
'procedure' write (
|
||||
'value''integer', 'byte''array', 'value''integer');
|
||||
)
|
||||
|
||||
'begin'
|
||||
'byte''array' Buf [1:12] := "Hello World", 10;
|
||||
|
||||
write (1, Buf, 12);
|
||||
'end'
|
||||
Reference in New Issue
Block a user