用Ada中的Float分隔字符

Question

所以我试图使用运算符用浮点来划分字符，但我不知道为什么我的代码会收到错误消息"意外的"；位置"；属性"；

function "/"(Teck: in Character;
Flyt: in Float) return Float is


begin

return Float(Character'Position(Teck))/Flyt;

end "/";

有人能解释一下Character的位置是如何工作的吗？我需要在这里更改什么，因为我以前在不同的任务中使用过几乎相同的代码。

Answer 1

关于ARM，字符被定义为

UC_C_Cedilla               : constant Character := 'Ç'; --Character'Val(199)

如果你在ARM中读取离散类型的操作，你会发现Val的逆属性是Pos，而不是Position。