Blame view

build5/epsilon-master/python/src/py/emitcommon.c 2.87 KB
6663b6c9   adorian   projet complet av...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
  /*
   * This file is part of the MicroPython project, http://micropython.org/
   *
   * The MIT License (MIT)
   *
   * Copyright (c) 2013, 2014 Damien P. George
   *
   * Permission is hereby granted, free of charge, to any person obtaining a copy
   * of this software and associated documentation files (the "Software"), to deal
   * in the Software without restriction, including without limitation the rights
   * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
   * copies of the Software, and to permit persons to whom the Software is
   * furnished to do so, subject to the following conditions:
   *
   * The above copyright notice and this permission notice shall be included in
   * all copies or substantial portions of the Software.
   *
   * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
   * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
   * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
   * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
   * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
   * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
   * THE SOFTWARE.
   */
  
  #include <assert.h>
  
  #include "py/emit.h"
  
  #if MICROPY_ENABLE_COMPILER
  
  void mp_emit_common_get_id_for_load(scope_t *scope, qstr qst) {
      // name adding/lookup
      bool added;
      id_info_t *id = scope_find_or_add_id(scope, qst, &added);
      if (added) {
          scope_find_local_and_close_over(scope, id, qst);
      }
  }
  
  void mp_emit_common_get_id_for_modification(scope_t *scope, qstr qst) {
      // name adding/lookup
      bool added;
      id_info_t *id = scope_find_or_add_id(scope, qst, &added);
      if (added) {
          if (SCOPE_IS_FUNC_LIKE(scope->kind)) {
              id->kind = ID_INFO_KIND_LOCAL;
          } else {
              id->kind = ID_INFO_KIND_GLOBAL_IMPLICIT;
          }
      } else if (SCOPE_IS_FUNC_LIKE(scope->kind) && id->kind == ID_INFO_KIND_GLOBAL_IMPLICIT) {
          // rebind as a local variable
          id->kind = ID_INFO_KIND_LOCAL;
      }
  }
  
  void mp_emit_common_id_op(emit_t *emit, const mp_emit_method_table_id_ops_t *emit_method_table, scope_t *scope, qstr qst) {
      // assumes pass is greater than 1, ie that all identifiers are defined in the scope
  
      id_info_t *id = scope_find(scope, qst);
      assert(id != NULL);
  
      // call the emit backend with the correct code
      if (id->kind == ID_INFO_KIND_GLOBAL_IMPLICIT) {
          emit_method_table->name(emit, qst);
      } else if (id->kind == ID_INFO_KIND_GLOBAL_EXPLICIT) {
          emit_method_table->global(emit, qst);
      } else if (id->kind == ID_INFO_KIND_LOCAL) {
          emit_method_table->fast(emit, qst, id->local_num);
      } else {
          assert(id->kind == ID_INFO_KIND_CELL || id->kind == ID_INFO_KIND_FREE);
          emit_method_table->deref(emit, qst, id->local_num);
      }
  }
  
  #endif // MICROPY_ENABLE_COMPILER