gloc              304 src/compaux.c  #define INIT_GLOC(gloc, name, mod)                                      \
gloc              306 src/compaux.c          gloc = Scm_FindBinding(mod, SCM_SYMBOL(SCM_INTERN(name)), TRUE); \
gloc              307 src/compaux.c          if (gloc == NULL) {                                             \
gloc             1913 src/gauche.h   #define SCM_GLOC_GET(gloc) \
gloc             1914 src/gauche.h       ((gloc)->getter? (gloc)->getter(gloc) : (gloc)->value)
gloc             1915 src/gauche.h   #define SCM_GLOC_SET(gloc, val) \
gloc             1916 src/gauche.h       ((gloc)->setter? (gloc)->setter((gloc), (val)) : ((gloc)->value = (val)))
gloc             1922 src/gauche.h   #define SCM_GLOC_CONST_P(gloc) \
gloc             1923 src/gauche.h       ((gloc)->setter == Scm_GlocConstSetter)
gloc              354 src/intlib.c     ScmGloc* gloc;
gloc              358 src/intlib.c     gloc = SCM_GLOC(gloc_scm);
gloc              362 src/intlib.c   SCM_RESULT = SCM_GLOC_GET(gloc);
gloc              374 src/intlib.c     ScmGloc* gloc;
gloc              380 src/intlib.c     gloc = SCM_GLOC(gloc_scm);
gloc              386 src/intlib.c   SCM_RESULT = SCM_GLOC_SET(gloc, value);
gloc              398 src/intlib.c     ScmGloc* gloc;
gloc              402 src/intlib.c     gloc = SCM_GLOC(gloc_scm);
gloc              406 src/intlib.c   SCM_RESULT = SCM_GLOC_CONST_P(gloc);
gloc              423 src/intlib.c   ScmGloc *gloc = Scm_FindBinding(SCM_IDENTIFIER(id)->module,
gloc              426 src/intlib.c     if (!gloc) SCM_RETURN(Scm_Values2(SCM_FALSE, SCM_FALSE));
gloc              427 src/intlib.c     gval = SCM_GLOC_GET(gloc);
gloc              191 src/module.c       ScmGloc *gloc = NULL;
gloc              207 src/module.c           gloc = SCM_GLOC(e->value);
gloc              208 src/module.c           if (!SCM_UNBOUNDP(gloc->value)) goto found;
gloc              234 src/module.c                       gloc = g;
gloc              252 src/module.c               if (e) { gloc = SCM_GLOC(e->value); goto found; }
gloc              257 src/module.c       return gloc;
gloc              214 src/symbol.c   ScmObj Scm_GlocConstSetter(ScmGloc *gloc, ScmObj val)
gloc              217 src/symbol.c                 gloc->module->name, gloc->name);
gloc              607 src/vm.c               ScmGloc *gloc;                                                  \
gloc              611 src/vm.c                   gloc = Scm_FindBinding(SCM_IDENTIFIER(v)->module,           \
gloc              614 src/vm.c                   if (gloc == NULL) {                                         \
gloc              619 src/vm.c                   *PC = SCM_WORD(gloc);                                       \
gloc              621 src/vm.c                   gloc = SCM_GLOC(v);                                         \
gloc              623 src/vm.c               v = SCM_GLOC_GET(gloc);                                         \
gloc              625 src/vm.c                   VM_ERR(("unbound variable: %S", SCM_OBJ(gloc->name)));      \
gloc             1308 src/vm.c                           ScmGloc *gloc;
gloc             1315 src/vm.c                           gloc = Scm_FindBinding(id->module, id->name,
gloc             1317 src/vm.c                           if (gloc == NULL) {
gloc             1320 src/vm.c                                   gloc = Scm_FindBinding(id->module, id->name, FALSE);
gloc             1321 src/vm.c                                   if (gloc != NULL) {
gloc             1329 src/vm.c                           SCM_GLOC_SET(gloc, VAL0);
gloc             1332 src/vm.c                           *PC = SCM_WORD(gloc);