Ada要枚舉轉換的字符串

Question

我想將現有字符串轉換爲枚舉（不能將它作爲枚舉讀取）。我怎樣才能做到這一點？

Answer 1

例如：

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

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