ada2012

问题 I previously asked a question regarding accessibility checks being raised in Ada, which @Brian Drummond was kind enough to awnser. The accessibility check was in a function, now I have a similair problem within a procedure; any guidance as to why this is would be greatly appreciated. The code I am working on has been taken from here: https://github.com/raph-amiard/ada-synth-lib The code in main file below is from the the Simple_Sine example which can be found here: https://github.com/raph

问题 I have downloaded this program from Github: https://github.com/raph-amiard/ada-synth-lib I have attemted the first example and I am presented with an exception. If anybody would be able to give me an insight into why this is, it would be massively appreciated. I've been stumped on this for a long time and I'm really keen to get this working. The error I recieve is: raised PROGRAM_ERROR : waves.adb:110 accessibility check failed Here is the main file: with Waves; use Waves; with Write_To

问题 I have downloaded this program from Github: https://github.com/raph-amiard/ada-synth-lib I have attemted the first example and I am presented with an exception. If anybody would be able to give me an insight into why this is, it would be massively appreciated. I've been stumped on this for a long time and I'm really keen to get this working. The error I recieve is: raised PROGRAM_ERROR : waves.adb:110 accessibility check failed Here is the main file: with Waves; use Waves; with Write_To

问题 Without copy-pasting my code here, how can I stop my ADA program from executing anymore lines of code during run-time if it calculates a certain value to 'X'? something like: variable_name := variable_name +4; if variable_name >1 then // END program here and dont execute any lines under this one end if I am not new to programming but new to ADA so finding the correct syntax is a pain. Any help? 回答1: There isn’t any specific syntax for this. If you are in the main procedure, a simple return