conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

eliminate uses of '__'

This commit is contained in:
Yuichi Nishiwaki 2014-09-14 17:54:53 +09:00
parent 09e56c2c35
commit 0c8d5aa33c
19 changed files with 48 additions and 48 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
include/picrin.h
View File

@ -21,8 +21,8 @@
* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
*/
#ifndef PICRIN_H__
#define PICRIN_H__
#ifndef PICRIN_H
#define PICRIN_H
#if defined(__cplusplus)
extern "C" {
@ -188,8 +188,8 @@ struct pic_lib *pic_open_library(pic_state *, pic_value);
struct pic_lib *pic_find_library(pic_state *, pic_value);
#define pic_deflibrary(pic, spec) \
pic_deflibrary_helper__(pic, GENSYM(i), GENSYM(prev_lib), spec)
#define pic_deflibrary_helper__(pic, i, prev_lib, spec) \
pic_deflibrary_helper_(pic, GENSYM(i), GENSYM(prev_lib), spec)
#define pic_deflibrary_helper_(pic, i, prev_lib, spec) \
for (int i = 0; ! i; ) \
for (struct pic_lib *prev_lib; ! i; ) \
for ((prev_lib = pic->lib), pic_open_library(pic, pic_read_cstr(pic, spec)), pic_in_library(pic, pic_read_cstr(pic, spec)); ! i++; pic->lib = prev_lib)

4
include/picrin/blob.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_BLOB_H__
#define PICRIN_BLOB_H__
#ifndef PICRIN_BLOB_H
#define PICRIN_BLOB_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/cont.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_CONT_H__
#define PICRIN_CONT_H__
#ifndef PICRIN_CONT_H
#define PICRIN_CONT_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/data.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_DATA_H__
#define PICRIN_DATA_H__
#ifndef PICRIN_DATA_H
#define PICRIN_DATA_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/dict.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_DICT_H__
#define PICRIN_DICT_H__
#ifndef PICRIN_DICT_H
#define PICRIN_DICT_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/error.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_ERROR_H__
#define PICRIN_ERROR_H__
#ifndef PICRIN_ERROR_H
#define PICRIN_ERROR_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/gc.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_GC_H__
#define PICRIN_GC_H__
#ifndef PICRIN_GC_H
#define PICRIN_GC_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/irep.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_IREP_H__
#define PICRIN_IREP_H__
#ifndef PICRIN_IREP_H
#define PICRIN_IREP_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/lib.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_LIB_H__
#define PICRIN_LIB_H__
#ifndef PICRIN_LIB_H
#define PICRIN_LIB_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/macro.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_MACRO_H__
#define PICRIN_MACRO_H__
#ifndef PICRIN_MACRO_H
#define PICRIN_MACRO_H
#if defined(__cplusplus)
extern "C" {

8
include/picrin/pair.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_PAIR_H__
#define PICRIN_PAIR_H__
#ifndef PICRIN_PAIR_H
#define PICRIN_PAIR_H
#if defined(__cplusplus)
extern "C" {
@ -36,8 +36,8 @@ pic_value pic_list_by_array(pic_state *, size_t, pic_value *);
pic_value pic_make_list(pic_state *, int, pic_value);
#define pic_for_each(var, list) \
pic_for_each_helper__(var, GENSYM(tmp), list)
#define pic_for_each_helper__(var, tmp, list) \
pic_for_each_helper_(var, GENSYM(tmp), list)
#define pic_for_each_helper_(var, tmp, list) \
for (pic_value tmp = (list); \
pic_nil_p(tmp) ? false : ((var = pic_car(pic, tmp)), true); \
tmp = pic_cdr(pic, tmp))

4
include/picrin/port.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_PORT_H__
#define PICRIN_PORT_H__
#ifndef PICRIN_PORT_H
#define PICRIN_PORT_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/proc.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_PROC_H__
#define PICRIN_PROC_H__
#ifndef PICRIN_PROC_H
#define PICRIN_PROC_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/read.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_READ_H__
#define PICRIN_READ_H__
#ifndef PICRIN_READ_H
#define PICRIN_READ_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/string.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_STRING_H__
#define PICRIN_STRING_H__
#ifndef PICRIN_STRING_H
#define PICRIN_STRING_H
#if defined(__cplusplus)
extern "C" {

16
include/picrin/util.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_UTIL_H__
#define PICRIN_UTIL_H__
#ifndef PICRIN_UTIL_H
#define PICRIN_UTIL_H
#if defined(__cplusplus)
extern "C" {
@ -20,12 +20,12 @@ extern "C" {
#define FALLTHROUGH ((void)0)
#define UNUSED(v) ((void)(v))
#define GENSYM2__(x,y) G##x##_##y##__
#define GENSYM1__(x,y) GENSYM2__(x,y)
#define GENSYM2_(x,y) G##x##_##y##__
#define GENSYM1_(x,y) GENSYM2_(x,y)
#if defined(__COUNTER__)
# define GENSYM(x) GENSYM1__(__COUNTER__,x)
# define GENSYM(x) GENSYM1_(__COUNTER__,x)
#else
# define GENSYM(x) GENSYM1__(__LINE__,x)
# define GENSYM(x) GENSYM1_(__LINE__,x)
#endif
#if GCC_VERSION >= 40500 || __clang__
@ -36,8 +36,8 @@ extern "C" {
#endif
#define SWAP(type,a,b) \
SWAP_HELPER__(type,GENSYM(tmp),a,b)
#define SWAP_HELPER__(type,tmp,a,b) \
SWAP_HELPER_(type,GENSYM(tmp),a,b)
#define SWAP_HELPER_(type,tmp,a,b) \
do { \
type tmp = (a); \
(a) = (b); \

4
include/picrin/value.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_VALUE_H__
#define PICRIN_VALUE_H__
#ifndef PICRIN_VALUE_H
#define PICRIN_VALUE_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/var.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_VAR_H__
#define PICRIN_VAR_H__
#ifndef PICRIN_VAR_H
#define PICRIN_VAR_H
#if defined(__cplusplus)
extern "C" {

4
include/picrin/vector.h
View File

@ -2,8 +2,8 @@
* See Copyright Notice in picrin.h
*/
#ifndef PICRIN_VECTOR_H__
#define PICRIN_VECTOR_H__
#ifndef PICRIN_VECTOR_H
#define PICRIN_VECTOR_H
#if defined(__cplusplus)
extern "C" {