From 05cebe47b5cbca645526e131f736dbf8c545a5c3 Mon Sep 17 00:00:00 2001 From: Mattias Andrée Date: Fri, 12 Dec 2014 23:04:33 +0100 Subject: mds-kbdc: beginning on call-stacks MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Mattias Andrée --- src/mds-kbdc/call-stack.c | 51 +++++++++++++++++++++++++++++++++++++++++++ src/mds-kbdc/call-stack.h | 42 +++++++++++++++++++++++++++++++++++ src/mds-kbdc/compile-layout.c | 8 ++++--- 3 files changed, 98 insertions(+), 3 deletions(-) create mode 100644 src/mds-kbdc/call-stack.c create mode 100644 src/mds-kbdc/call-stack.h (limited to 'src') diff --git a/src/mds-kbdc/call-stack.c b/src/mds-kbdc/call-stack.c new file mode 100644 index 0000000..c8b4e2c --- /dev/null +++ b/src/mds-kbdc/call-stack.c @@ -0,0 +1,51 @@ +/** + * mds — A micro-display server + * Copyright © 2014 Mattias Andrée (maandree@member.fsf.org) + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + */ +#include "call-stack.h" + + + +/** + * Variable whether the latest created error is stored + */ +static mds_kbdc_parse_error_t* error; + +/** + * The `result` parameter of root procedure that requires the include-stack + */ +static mds_kbdc_parsed_t* result; + + + +/** + * Prepare for usage of call-stacks + * + * @param result_ The `result` parameter of root procedure that requires the call-stack + */ +void mds_kbdc_call_stack_begin(mds_kbdc_parsed_t* restrict result_) +{ + result = result_; +} + + +/** + * Cleanup after usage of call-stacks + */ +void mds_kbdc_call_stack_end(void) +{ +} + diff --git a/src/mds-kbdc/call-stack.h b/src/mds-kbdc/call-stack.h new file mode 100644 index 0000000..fffedf1 --- /dev/null +++ b/src/mds-kbdc/call-stack.h @@ -0,0 +1,42 @@ +/** + * mds — A micro-display server + * Copyright © 2014 Mattias Andrée (maandree@member.fsf.org) + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + */ +#ifndef MDS_MDS_KBDC_CALL_STACK_H +#define MDS_MDS_KBDC_CALL_STACK_H + + +#include "parsed.h" +#include "include-stack.h" + + + +/** + * Prepare for usage of call-stacks + * + * @param result The `result` parameter of root procedure that requires the call-stack + */ +void mds_kbdc_call_stack_begin(mds_kbdc_parsed_t* restrict result); + +/** + * Cleanup after usage of call-stacks + */ +void mds_kbdc_call_stack_end(void); + + + +#endif + diff --git a/src/mds-kbdc/compile-layout.c b/src/mds-kbdc/compile-layout.c index 93eb219..371394d 100644 --- a/src/mds-kbdc/compile-layout.c +++ b/src/mds-kbdc/compile-layout.c @@ -16,11 +16,10 @@ * along with this program. If not, see . */ #include "compile-layout.h" -/* TODO add call stack */ /* XXX fix so that for-loops do not generate the same errors/warnings in all iterations [loopy_error]. */ /* XXX add pragma support */ -#include "include-stack.h" +#include "call-stack.h" #include "builtin-functions.h" #include "string.h" #include "variables.h" @@ -2590,9 +2589,12 @@ static int compile_subtree(mds_kbdc_tree_t* restrict tree) int compile_layout(mds_kbdc_parsed_t* restrict result_) { int r, saved_errno; - mds_kbdc_include_stack_begin(result = result_); + result = result_; + mds_kbdc_include_stack_begin(result_); + mds_kbdc_call_stack_begin(result_); r = compile_subtree(result_->tree); saved_errno = errno; + mds_kbdc_call_stack_end(); mds_kbdc_include_stack_end(); variables_terminate(); callables_terminate(); -- cgit v1.2.3-70-g09d2