Added 'Misc./comprehensions.adb'
This commit is contained in:
parent
f75378edfc
commit
3845ae664f
8
Misc./comprehensions.adb
Normal file
8
Misc./comprehensions.adb
Normal file
@ -0,0 +1,8 @@
|
||||
-- @BAKE gnatmake-10 -gnat2022 -o comprehender $@
|
||||
|
||||
procedure Comrehension is
|
||||
type Integer_Array is array (Positive range <>) of Integer;
|
||||
Vector : Integer_Array := [for J in 1 .. 5 => J * 2];
|
||||
begin
|
||||
null;
|
||||
end Comrehension;
|
Loading…
x
Reference in New Issue
Block a user