From 323d3b6ade62fdb6a408203267f9f5644cf5afd3 Mon Sep 17 00:00:00 2001 From: Gabriel Corona Date: Thu, 24 Apr 2014 12:17:04 +0200 Subject: [PATCH] [mc] Add basic test for lexical-block scoped variable --- testsuite/mc/dwarf.c | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/testsuite/mc/dwarf.c b/testsuite/mc/dwarf.c index 50d8ad445b..059062d589 100644 --- a/testsuite/mc/dwarf.c +++ b/testsuite/mc/dwarf.c @@ -63,6 +63,13 @@ static dw_variable_t find_local_variable(dw_frame_t frame, const char* argument_ return variable; } + dw_frame_t scope = NULL; + xbt_dynar_foreach(frame->scopes, cursor, scope) { + variable = find_local_variable(scope, argument_name); + if(variable) + return variable; + } + return NULL; } @@ -141,6 +148,11 @@ int main(int argc, char** argv) { test_local_variable(mc_binary_info, "main", "argc", &argc, &cursor); + { + int lexical_block_variable = 50; + test_local_variable(mc_binary_info, "main", "lexical_block_variable", &lexical_block_variable, &cursor); + } + s_foo my_foo; test_type_by_name(my_foo); -- 2.20.1