forced           2443 src/gauche.h   SCM_EXTERN ScmObj Scm_MakePromise(int forced, ScmObj code);
forced             71 src/promise.c      int forced;                 /* TRUE if code has a thunk */
forced             82 src/promise.c      const char *forced = p->content->forced? " (forced)" : "";
forced             84 src/promise.c          Scm_Printf(port, "#<promise %p%s>", p, forced);
forced             86 src/promise.c          Scm_Printf(port, "#<promise(%S) %p%s>", p->kind, p, forced);
forced             96 src/promise.c  ScmObj Scm_MakePromise(int forced, ScmObj code)
forced            101 src/promise.c      c->forced = forced;
forced            118 src/promise.c      if (!p->content->forced) {
forced            122 src/promise.c              p->content->forced = SCM_PROMISE(result)->content->forced;
forced            129 src/promise.c              p->content->forced = TRUE;
forced            142 src/promise.c          if (p->content->forced) SCM_RETURN(p->content->code);