Annotation of parser3/src/types/pa_vmethod_frame.C, revision 1.12
1.2 paf 1: /** @file
2: Parser: method frame class.
3:
1.10 misha 4: Copyright (c) 2001-2009 ArtLebedev Group (http://www.artlebedev.com)
1.2 paf 5: Author: Alexandr Petrosian <paf@design.ru> (http://paf.design.ru)\
6: */
7:
1.12 ! misha 8: static const char * const IDENT_VSTATELESS_CLASS_C="$Date: 2009-04-15 07:41:45 $";
1.2 paf 9:
10: #include "pa_vmethod_frame.h"
11: #include "pa_request.h"
12:
13: // globals
14:
15: const String result_var_name(RESULT_VAR_NAME);
1.11 misha 16: const uint result_var_hash_code(hash_code(result_var_name));
1.2 paf 17:
18: // MethodParams: methods
19:
1.7 paf 20: Value& MethodParams::get_processed(Value* value, const char* msg, int index, Request& r) {
21: return r.process_to_value(as_junction(value, msg, index), false /*do not intercept string*/);
1.2 paf 22: }
23:
24: // VMethodFrame: methods
25:
26: VMethodFrame::VMethodFrame(
27: const Junction& ajunction/*info: always method-junction*/,
28: VMethodFrame *acaller) :
29: WContext(0/*empty*/, 0 /* no parent, junctions can be reattached only up to VMethodFrame */),
30:
1.4 paf 31: fcaller(acaller),
1.2 paf 32:
33: store_param_index(0),
1.12 ! misha 34: my(0),
1.2 paf 35: fself(0),
36:
1.4 paf 37: junction(ajunction) {
1.2 paf 38:
1.9 misha 39: put_element_impl=(junction.method->all_vars_local)?&VMethodFrame::put_element_local:&VMethodFrame::put_element_global;
40:
1.12 ! misha 41: if(!junction.method->max_numbered_params_count){ // this method uses numbered params?
1.2 paf 42: my=new HashStringValue;
43:
44: const Method &method=*junction.method;
45: if(method.locals_names) { // are there any local var names?
46: // remember them
47: // those are flags that fname is local == to be looked up in 'my'
48: for(Array_iterator<const String*> i(*method.locals_names); i.has_next(); ) {
49: // speedup: not checking for clash with "result" fname
50: const String& fname=*i.next();
1.10 misha 51: set_my_variable(fname, *VVoid::get());
1.2 paf 52: }
53: }
54: { // always there is one local: $result
1.11 misha 55: set_my_variable(result_var_name, *VVoid::get());
1.2 paf 56: }
57: }
58: }
59:
60: Value* VMethodFrame::get_result_variable() {
1.11 misha 61: if(!my)
62: return 0;
63:
64: Value* result=my->get_by_hash_code(result_var_hash_code, result_var_name);
65: return result!=VVoid::get()?result:0;
1.2 paf 66: }
E-mail: