cosmopolitan/tool/plinko/lib/histo.h

#ifndef COSMOPOLITAN_TOOL_PLINKO_LIB_HISTO_H_
#define COSMOPOLITAN_TOOL_PLINKO_LIB_HISTO_H_
#include "libc/intrin/bsr.h"
#include "libc/macros.internal.h"
COSMOPOLITAN_C_START_

#define HISTO(H, X)                \
  do {                             \
    uint64_t x_ = X;               \
    x_ = x_ ? bsrl(x_) + 1 : x_;   \
    ++H[MIN(x_, ARRAYLEN(H) - 1)]; \
  } while (0)

void PrintHistogram(int, const char *, const long *, size_t);
long GetLongSum(const long *, size_t);

COSMOPOLITAN_C_END_
#endif /* COSMOPOLITAN_TOOL_PLINKO_LIB_HISTO_H_ */
Add LISP interpreter 2022-04-08 03:30:22 +00:00			`#ifndef COSMOPOLITAN_TOOL_PLINKO_LIB_HISTO_H_`
			`#define COSMOPOLITAN_TOOL_PLINKO_LIB_HISTO_H_`
Pay off more technical debt This makes breaking changes to add underscores to many non-standard function names provided by the c library. MODE=tiny is now tinier and we now use smaller locks that are better for tiny apps in this mode. Some headers have been renamed to be in the same folder as the build package, so it'll be easier to know which build dependency is needed. Certain old misguided interfaces have been removed. Intel intrinsics headers are now listed in libc/isystem (but not in the amalgamation) to help further improve open source compatibility. Header complexity has also been reduced. Lastly, more shell scripts are now available. 2022-09-13 06:10:38 +00:00			`#include "libc/intrin/bsr.h"`
Add LISP interpreter 2022-04-08 03:30:22 +00:00			`#include "libc/macros.internal.h"`
			`COSMOPOLITAN_C_START_`

			`#define HISTO(H, X) \`
			`do { \`
			`uint64_t x_ = X; \`
Rename _bsr/_bsf to bsr/bsf Now that these functions are behind _COSMO_SOURCE there's no reason for having the ugly underscore anymore. To use these functions, you need to pass -mcosmo to cosmocc. 2024-03-05 01:33:26 +00:00			`x_ = x_ ? bsrl(x_) + 1 : x_; \`
Add LISP interpreter 2022-04-08 03:30:22 +00:00			`++H[MIN(x_, ARRAYLEN(H) - 1)]; \`
			`} while (0)`

			`void PrintHistogram(int, const char , const long , size_t);`
			`long GetLongSum(const long *, size_t);`

			`COSMOPOLITAN_C_END_`
			`#endif /* COSMOPOLITAN_TOOL_PLINKO_LIB_HISTO_H_ */`