result.ch\gdb.chill\testsuite\gdb - riscv-gnu-toolchain/gdb.git - Unnamed repository; edit this file 'description' to name the repository.

index : riscv-gnu-toolchain/gdb.git

Unnamed repository; edit this file 'description' to name the repository.

root

about summary refs log tree commit diff

path: root/gdb/testsuite/gdb.chill/result.ch

blob: 71e64005d5207242606bf656c38c61c9c295ed31 (plain)

test_result:  MODULE

  DCL i INT := 5;

  simple_func: PROC () RETURNS (INT);
    DCL j INT := i;
    RESULT 10;
    i + := 2;
    RESULT j + 2;
    i + := 2;
  END simple_func;

  i := simple_func ();
  i := simple_func ();
  i * := 10;
END test_result;