* rename
This commit is contained in:
parent
ba260cd54d
commit
17c511b3d0
|
@ -33,6 +33,6 @@ package Video.Images.Indexed.Fixed is
|
|||
-- Above does not compile due to bug in GNAT
|
||||
|
||||
package Fixed_Index_8 is new Generic_Fixed (
|
||||
Base => Index_8_Base);
|
||||
Base => Index_8);
|
||||
|
||||
end Video.Images.Indexed.Fixed;
|
||||
|
|
|
@ -25,12 +25,12 @@ package Video.Images.Indexed.Unbounded is
|
|||
end Generic_Unbounded;
|
||||
|
||||
package Unbounded_Index_1 is new Generic_Unbounded (
|
||||
Base => Index_1_Base);
|
||||
Base => Index_1);
|
||||
|
||||
package Unbounded_Index_4 is new Generic_Unbounded (
|
||||
Base => Index_4_Base);
|
||||
Base => Index_4);
|
||||
|
||||
package Unbounded_Index_8 is new Generic_Unbounded (
|
||||
Base => Index_8_Base);
|
||||
Base => Index_8);
|
||||
|
||||
end Video.Images.Indexed.Unbounded;
|
||||
|
|
|
@ -65,15 +65,15 @@ package Video.Images.Indexed is
|
|||
|
||||
end Indexed_Base;
|
||||
|
||||
package Index_1_Base is new Indexed_Base (
|
||||
package Index_1 is new Indexed_Base (
|
||||
Pixel_Type => Index_1_Pixel,
|
||||
Array_Type => Index_1_Array);
|
||||
|
||||
package Index_4_Base is new Indexed_Base (
|
||||
package Index_4 is new Indexed_Base (
|
||||
Pixel_Type => Index_4_Pixel,
|
||||
Array_Type => Index_4_Array);
|
||||
|
||||
package Index_8_Base is new Indexed_Base (
|
||||
package Index_8 is new Indexed_Base (
|
||||
Pixel_Type => Index_8_Pixel,
|
||||
Array_Type => Index_8_Array);
|
||||
|
||||
|
|
Loading…
Reference in New Issue