With Grt.Arch_None;
Package Grt.Arch renames Grt.Arch_None;