GLPK/Ada

Ada 是一种在 ISO/IEC 8652:2012 中定义的编程语言。

Ada 可以直接调用 C 库。以下程序 glpkversion.adb 调用 glp_version() 以输出 GLPK 库的版本。

with Ada.Text_IO; use Ada.Text_IO;
with Interfaces.C; use Interfaces.C;
with Interfaces.C.Strings;

procedure glpkversion is

  function glp_version return Interfaces.C.Strings.chars_ptr;
  pragma Import (C, glp_version, "glp_version");

begin
  Put_LINE(Strings.Value(glp_version));
end glpkversion;

使用以下命令进行编译、绑定和链接

gcc -c glpkversion.adb
gnatbind glpkversion
gnatlink -lglpk glpkversion

在 KuKu3 中的 Futoshiki 应用程序中，可以找到使用 Ada 和 GLPK 的更详细示例。