Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/spring-mvc/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
GNAT如何制作第一个数组ada程序,没有为此项目定义语言_Ada_Gnat - Fatal编程技术网

GNAT如何制作第一个数组ada程序,没有为此项目定义语言

GNAT如何制作第一个数组ada程序,没有为此项目定义语言,ada,gnat,Ada,Gnat,我有Windows1064bit,我安装了GNATProgrammingStudio(没有像JavaJDK那样的设置)。我想在GPS GNAT编程工作室制作我的第一个Ada程序 基于此,以下是Arrayproject.adb: with Ada.Text_IO; with Ada.Integer_Text_IO; use Ada.Integer_Text_IO; use Ada.Text_IO; procedure Arrayproject is type MyArray is array

我有Windows1064bit,我安装了GNATProgrammingStudio(没有像JavaJDK那样的设置)。我想在GPS GNAT编程工作室制作我的第一个Ada程序

基于此,以下是
Arrayproject.adb

with Ada.Text_IO;
with Ada.Integer_Text_IO;
use Ada.Integer_Text_IO;
use Ada.Text_IO;

procedure Arrayproject is

type MyArray is array (1 .. 16) of Integer;

procedure put(s: MyArray) is
    begin
    for i in s'range loop
        Put (s(i), Width =>4);
    end loop;
    new_line;
end put;

s: MyArray := (11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26);
d: MyArray := s;

begin
put_Line ("Chunks of source Array");
put(s);
put_Line ("Chunks of destination of array");
d(1 .. 4) :=s(9 .. 12);
d(5 .. 8) :=s(1 .. 4);
d(9 .. 12) :=s(13 .. 16);
d(13 .. 16) :=s(5 .. 8);
put (d);
end Arrayproject;
这段代码在在线Ada编译器中编译得很好,但我不知道如何在GNAT编程工作室中使用它。出现错误,没有为此项目定义语言

以下是khurram.gpr。请帮我做探地雷达和编译

Project Khurram is
for Source_Dirs use ("src");
for Object_Dir use "obj";
for Main use ("Arrayproject.adb");
end Khurram;

在.gpr文件中定义语言:


用于语言使用(“Ada”)

在.gpr文件中定义一种语言:


用于语言使用(“Ada”)

我认为该错误意味着GPS找不到编译器-路径设置正确吗?您是否使用windows编译器工具链安装GPS?引用原始代码作为服务条款。我认为该错误意味着GPS找不到编译器-路径设置正确吗?您是否使用编译器工具安装GPSwindows链?引用原始代码作为服务条款。