- if(sp > 0) {
- ev_env_t *env = &envs[sp - 1];
- if(env->f)
- fprintf(env->f, "%s%s;%d\n", env->tag, ev, value);
- }
+ ev_env_t *env;
+
+ if (sp == 0)
+ return;
+
+ env = &envs[sp - 1];
+ if (env->f == NULL)
+ return;
+
+ fprintf(env->f, "%s%s;%d\n", env->tag, ev, value);
+}
+
+void be_stat_ev_l(const char *ev, long value)
+{
+ ev_env_t *env;
+
+ if (sp == 0)
+ return;
+
+ env = &envs[sp - 1];
+ if (env->f == NULL)
+ return;
+
+ fprintf(env->f, "%s%s;%ld\n", env->tag, ev, value);
+}
+
+void be_stat_ev_dbl(const char *ev, double value)
+{
+ ev_env_t *env;
+
+ if (sp == 0)
+ return;
+
+ env = &envs[sp - 1];
+ if (env->f == NULL)
+ return;
+
+ fprintf(env->f, "%s%s;%f\n", env->tag, ev, value);
+}
+
+void be_stat_ev_ull(const char *ev, ulong64 value)
+{
+ ev_env_t *env;
+
+ if (sp == 0)
+ return;
+
+ env = &envs[sp - 1];
+ if (env->f == NULL)
+ return;
+
+ fprintf(env->f, "%s%s;%" ULL_FMT "\n", env->tag, ev, value);