string - Ada 字符串到枚举的转换

Question

我想将现有字符串转换为枚举（而不是将其作为枚举读入）。我怎样才能做到这一点？

Answer 1

例子：

-- type declaration
type Hands is (Left, Right);

-- code body
Hand : Hands;
Hand := Hands'Value("Left"); -- yields `Left`