• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号
登陆 注册

C++ BINT函数代码示例

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

本文整理汇总了C++中BINT函数的典型用法代码示例。如果您正苦于以下问题：C++ BINT函数的具体用法？C++ BINT怎么用？C++ BINT使用的例子？那么恭喜您, 这里精选的函数代码示例或许可以为您提供帮助。



在下文中一共展示了BINT函数的20个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于我们的系统推荐出更棒的C++代码示例。

示例1: BGl_zc3anonymousza31901ze3z83zz__rgc_configz00

/* <anonymous:1901> */
	obj_t BGl_zc3anonymousza31901ze3z83zz__rgc_configz00(obj_t BgL_envz00_1603,
		obj_t BgL_xz00_1604)
	{
		AN_OBJECT;
		{	/* Rgc/rgcconfig.scm 115 */
			{
				obj_t BgL_xz00_807;

				{	/* Rgc/rgcconfig.scm 116 */
					bool_t BgL_auxz00_1730;

					BgL_xz00_807 = BgL_xz00_1604;
					if (BGl_2ze3ze3zz__r4_numbers_6_5z00(BgL_xz00_807, BINT(((long) 0))))
						{	/* Rgc/rgcconfig.scm 116 */
							if (BGl_2zc3zc3zz__r4_numbers_6_5z00(BgL_xz00_807,
									BINT(((long) 256))))
								{	/* Rgc/rgcconfig.scm 116 */
									BgL_auxz00_1730 = CHARP(BgL_xz00_807);
								}
							else
								{	/* Rgc/rgcconfig.scm 116 */
									BgL_auxz00_1730 = ((bool_t) 0);
								}
						}
					else
						{	/* Rgc/rgcconfig.scm 116 */
							BgL_auxz00_1730 = ((bool_t) 0);
						}
					return BBOOL(BgL_auxz00_1730);
				}
			}
		}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:34，代码来源:rgcconfig.c


示例2: BGl__foreignzd2eqzf3z21zz__foreignz00

/* _foreign-eq? */
obj_t BGl__foreignzd2eqzf3z21zz__foreignz00(obj_t BgL_envz00_660, obj_t BgL_o1z00_661, obj_t BgL_o2z00_662)
{ AN_OBJECT;
{ /* Llib/foreign.scm 95 */
{ /* Llib/foreign.scm 96 */
bool_t BgL_auxz00_712;
{ /* Llib/foreign.scm 96 */
obj_t BgL_auxz00_720;obj_t BgL_auxz00_713;
if(
FOREIGNP(BgL_o2z00_662))
{ /* Llib/foreign.scm 96 */
BgL_auxz00_720 = BgL_o2z00_662
; }  else 
{ 
obj_t BgL_auxz00_723;
BgL_auxz00_723 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1394z00zz__foreignz00, 
BINT(((long)4136)), BGl_string1395z00zz__foreignz00, BGl_string1396z00zz__foreignz00, BgL_o2z00_662); 
FAILURE(BgL_auxz00_723,BFALSE,BFALSE);} 
if(
FOREIGNP(BgL_o1z00_661))
{ /* Llib/foreign.scm 96 */
BgL_auxz00_713 = BgL_o1z00_661
; }  else 
{ 
obj_t BgL_auxz00_716;
BgL_auxz00_716 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1394z00zz__foreignz00, 
BINT(((long)4133)), BGl_string1395z00zz__foreignz00, BGl_string1396z00zz__foreignz00, BgL_o1z00_661); 
FAILURE(BgL_auxz00_716,BFALSE,BFALSE);} 
BgL_auxz00_712 = 
FOREIGN_EQP(BgL_auxz00_713, BgL_auxz00_720); } 
return 
BBOOL(BgL_auxz00_712);} } 
}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:35，代码来源:foreign.c


示例3: BGl__processzd2pidzd2zz__processz00

/* _process-pid */
	obj_t BGl__processzd2pidzd2zz__processz00(obj_t BgL_envz00_1470,
		obj_t BgL_procz00_1471)
	{
		AN_OBJECT;
		{	/* Llib/process.scm 134 */
			{	/* Llib/process.scm 135 */
				int BgL_auxz00_1568;

				{	/* Llib/process.scm 135 */
					obj_t BgL_procz00_1532;

					if (PROCESSP(BgL_procz00_1471))
						{	/* Llib/process.scm 135 */
							BgL_procz00_1532 = BgL_procz00_1471;
						}
					else
						{
							obj_t BgL_auxz00_1571;

							BgL_auxz00_1571 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string2202z00zz__processz00,
								BINT(((long) 5703)), BGl_string2203z00zz__processz00,
								BGl_string2204z00zz__processz00, BgL_procz00_1471);
							FAILURE(BgL_auxz00_1571, BFALSE, BFALSE);
						}
					BgL_auxz00_1568 = PROCESS_PID(BgL_procz00_1532);
				}
				return BINT(BgL_auxz00_1568);
			}
		}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:32，代码来源:process.c


示例4: BGl__tvectorzd2lengthzd2zz__tvectorz00

/* _tvector-length */
	obj_t BGl__tvectorzd2lengthzd2zz__tvectorz00(obj_t BgL_envz00_1634,
		obj_t BgL_objz00_1635)
	{
		AN_OBJECT;
		{	/* Llib/tvector.scm 96 */
			{	/* Llib/tvector.scm 97 */
				int BgL_auxz00_1700;

				{	/* Llib/tvector.scm 97 */
					obj_t BgL_objz00_1679;

					if (TVECTORP(BgL_objz00_1635))
						{	/* Llib/tvector.scm 97 */
							BgL_objz00_1679 = BgL_objz00_1635;
						}
					else
						{
							obj_t BgL_auxz00_1703;

							BgL_auxz00_1703 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string2198z00zz__tvectorz00,
								BINT(((long) 3513)), BGl_string2199z00zz__tvectorz00,
								BGl_string2200z00zz__tvectorz00, BgL_objz00_1635);
							FAILURE(BgL_auxz00_1703, BFALSE, BFALSE);
						}
					BgL_auxz00_1700 = TVECTOR_LENGTH(BgL_objz00_1679);
				}
				return BINT(BgL_auxz00_1700);
			}
		}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:32，代码来源:tvector.c


示例5: passwd2list

static obj_t
passwd2list( struct passwd *pw ) {
   if( !pw ) {
      return BFALSE;
   } else {
      obj_t res;

      /* the shell */
      res = MAKE_PAIR( string_to_bstring( pw->pw_shell ), BNIL );
      /* the home directory */
      res = MAKE_PAIR( string_to_bstring( pw->pw_dir ), res );
      /* the real name */
#if BGL_HAVE_GECOS
      res = MAKE_PAIR( string_to_bstring( pw->pw_gecos ), res );
#endif   
      /* the group id */
      res = MAKE_PAIR( BINT( pw->pw_gid ), res );
      /* the user id */
      res = MAKE_PAIR( BINT( pw->pw_uid ), res );
      /* the password */
      res = MAKE_PAIR( string_to_bstring( pw->pw_passwd ), res );
      /* the name */
      res = MAKE_PAIR( string_to_bstring( pw->pw_name ), res );

      return res;
   }
}
开发者ID:donaldsonjw，项目名称:bigloo，代码行数:27，代码来源:csystem.c


示例6: BGl_foreignzd2eqzf3z21zz__foreignz00

/* foreign-eq? */
BGL_EXPORTED_DEF bool_t BGl_foreignzd2eqzf3z21zz__foreignz00(obj_t BgL_o1z00_2, obj_t BgL_o2z00_3)
{ AN_OBJECT;
{ /* Llib/foreign.scm 95 */
{ /* Llib/foreign.scm 96 */
obj_t BgL_auxz00_704;obj_t BgL_auxz00_697;
if(
FOREIGNP(BgL_o2z00_3))
{ /* Llib/foreign.scm 96 */
BgL_auxz00_704 = BgL_o2z00_3
; }  else 
{ 
obj_t BgL_auxz00_707;
BgL_auxz00_707 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1394z00zz__foreignz00, 
BINT(((long)4136)), BGl_string1395z00zz__foreignz00, BGl_string1396z00zz__foreignz00, BgL_o2z00_3); 
FAILURE(BgL_auxz00_707,BFALSE,BFALSE);} 
if(
FOREIGNP(BgL_o1z00_2))
{ /* Llib/foreign.scm 96 */
BgL_auxz00_697 = BgL_o1z00_2
; }  else 
{ 
obj_t BgL_auxz00_700;
BgL_auxz00_700 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1394z00zz__foreignz00, 
BINT(((long)4133)), BGl_string1395z00zz__foreignz00, BGl_string1396z00zz__foreignz00, BgL_o1z00_2); 
FAILURE(BgL_auxz00_700,BFALSE,BFALSE);} 
return 
FOREIGN_EQP(BgL_auxz00_697, BgL_auxz00_704);} } 
}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:31，代码来源:foreign.c


示例7: BGl_resetzd2statz12zc0zzinline_walkz00

/* reset-stat! */
	obj_t BGl_resetzd2statz12zc0zzinline_walkz00()
	{
		AN_OBJECT;
		{	/* Inline/walk.scm 78 */
			BGl_za2inlinedzd2callsza2zd2zzinline_walkz00 = BINT(((long) 0));
			return (BGl_za2nonzd2inlinedzd2callsza2z00zzinline_walkz00 =
				BINT(((long) 0)), BUNSPEC);
		}
	}
开发者ID:8l，项目名称:bigloo-llvm，代码行数:10，代码来源:walk.c


示例8: BGl_toplevelzd2initzd2zzinline_walkz00

/* toplevel-init */
	obj_t BGl_toplevelzd2initzd2zzinline_walkz00()
	{
		AN_OBJECT;
		{	/* Inline/walk.scm 15 */
			BGl_za2inlinezd2modeza2zd2zzinline_walkz00 = CNST_TABLE_REF(((long) 0));
			BGl_za2inlinedzd2callsza2zd2zzinline_walkz00 = BINT(((long) 0));
			BGl_za2nonzd2inlinedzd2callsza2z00zzinline_walkz00 = BINT(((long) 0));
			return (BGl_za2kfactorza2z00zzinline_walkz00 = BINT(((long) 1)), BUNSPEC);
		}
	}
开发者ID:8l，项目名称:bigloo-llvm，代码行数:11，代码来源:walk.c


示例9: BGl__listzd2ze3tvectorz31zz__tvectorz00

/* _list->tvector */
	obj_t BGl__listzd2ze3tvectorz31zz__tvectorz00(obj_t BgL_envz00_1647,
		obj_t BgL_idz00_1648, obj_t BgL_lz00_1649)
	{
		AN_OBJECT;
		{	/* Llib/tvector.scm 163 */
			{	/* Llib/tvector.scm 164 */
				obj_t BgL_auxz00_1838;

				obj_t BgL_auxz00_1831;

				{	/* Llib/tvector.scm 164 */
					bool_t BgL_testz00_1839;

					if (PAIRP(BgL_lz00_1649))
						{	/* Llib/tvector.scm 164 */
							BgL_testz00_1839 = ((bool_t) 1);
						}
					else
						{	/* Llib/tvector.scm 164 */
							BgL_testz00_1839 = NULLP(BgL_lz00_1649);
						}
					if (BgL_testz00_1839)
						{	/* Llib/tvector.scm 164 */
							BgL_auxz00_1838 = BgL_lz00_1649;
						}
					else
						{
							obj_t BgL_auxz00_1843;

							BgL_auxz00_1843 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string2198z00zz__tvectorz00,
								BINT(((long) 6767)), BGl_string2217z00zz__tvectorz00,
								BGl_string2218z00zz__tvectorz00, BgL_lz00_1649);
							FAILURE(BgL_auxz00_1843, BFALSE, BFALSE);
				}}
				if (SYMBOLP(BgL_idz00_1648))
					{	/* Llib/tvector.scm 164 */
						BgL_auxz00_1831 = BgL_idz00_1648;
					}
				else
					{
						obj_t BgL_auxz00_1834;

						BgL_auxz00_1834 =
							BGl_typezd2errorzd2zz__errorz00(BGl_string2198z00zz__tvectorz00,
							BINT(((long) 6767)), BGl_string2217z00zz__tvectorz00,
							BGl_string2203z00zz__tvectorz00, BgL_idz00_1648);
						FAILURE(BgL_auxz00_1834, BFALSE, BFALSE);
					}
				return
					BGl_listzd2ze3tvectorz31zz__tvectorz00(BgL_auxz00_1831,
					BgL_auxz00_1838);
			}
		}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:56，代码来源:tvector.c


示例10: BGl_globalzd2arityzd2zztools_argsz00

/* global-arity */
	BGL_EXPORTED_DEF long BGl_globalzd2arityzd2zztools_argsz00(obj_t
		BgL_argsz00_1)
	{
		AN_OBJECT;
		{	/* Tools/args.scm 37 */
			{
				long BgL_iz00_103;

				obj_t BgL_az00_104;

				{	/* Tools/args.scm 38 */
					obj_t BgL_auxz00_352;

					BgL_iz00_103 = ((long) 0);
					BgL_az00_104 = BgL_argsz00_1;
				BgL_zc3anonymousza31509ze3z83_105:
					if (NULLP(BgL_az00_104))
						{	/* Tools/args.scm 41 */
							BgL_auxz00_352 = BINT(BgL_iz00_103);
						}
					else
						{	/* Tools/args.scm 41 */
							if (PAIRP(BgL_az00_104))
								{	/* Tools/args.scm 43 */
									if (BGl_dssslzd2namedzd2constantzf3zf3zz__dssslz00(CAR
											(BgL_az00_104)))
										{	/* Tools/args.scm 44 */
											BgL_auxz00_352 =
												BGl_dssslzd2arityzd2zztools_dssslz00(BgL_argsz00_1,
												((bool_t) 1));
										}
									else
										{
											obj_t BgL_az00_364;

											long BgL_iz00_362;

											BgL_iz00_362 = (BgL_iz00_103 + ((long) 1));
											BgL_az00_364 = CDR(BgL_az00_104);
											BgL_az00_104 = BgL_az00_364;
											BgL_iz00_103 = BgL_iz00_362;
											goto BgL_zc3anonymousza31509ze3z83_105;
										}
								}
							else
								{	/* Tools/args.scm 43 */
									BgL_auxz00_352 = BINT(NEG((BgL_iz00_103 + ((long) 1))));
						}}
					return (long) CINT(BgL_auxz00_352);
		}}}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:52，代码来源:args.c


示例11: BGl_foreignzd2arityzd2zztools_argsz00

/* foreign-arity */
	BGL_EXPORTED_DEF long BGl_foreignzd2arityzd2zztools_argsz00(obj_t
		BgL_argsz00_3)
	{
		AN_OBJECT;
		{	/* Tools/args.scm 81 */
			{
				long BgL_iz00_127;

				obj_t BgL_az00_128;

				{	/* Tools/args.scm 82 */
					obj_t BgL_auxz00_392;

					BgL_iz00_127 = ((long) 0);
					BgL_az00_128 = BgL_argsz00_3;
				BgL_zc3anonymousza31525ze3z83_129:
					if (NULLP(BgL_az00_128))
						{	/* Tools/args.scm 85 */
							BgL_auxz00_392 = BINT(BgL_iz00_127);
						}
					else
						{	/* Tools/args.scm 85 */
							if (PAIRP(BgL_az00_128))
								{	/* Tools/args.scm 87 */
									if (BGl_dssslzd2namedzd2constantzf3zf3zz__dssslz00(CAR
											(BgL_az00_128)))
										{	/* Tools/args.scm 88 */
											BgL_auxz00_392 =
												BGl_errorz00zz__errorz00(CNST_TABLE_REF(((long) 0)),
												BGl_string1580z00zztools_argsz00, BgL_argsz00_3);
										}
									else
										{
											obj_t BgL_az00_405;

											long BgL_iz00_403;

											BgL_iz00_403 = (BgL_iz00_127 + ((long) 1));
											BgL_az00_405 = CDR(BgL_az00_128);
											BgL_az00_128 = BgL_az00_405;
											BgL_iz00_127 = BgL_iz00_403;
											goto BgL_zc3anonymousza31525ze3z83_129;
										}
								}
							else
								{	/* Tools/args.scm 87 */
									BgL_auxz00_392 = BINT(NEG((BgL_iz00_127 + ((long) 1))));
						}}
					return (long) CINT(BgL_auxz00_392);
		}}}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:52，代码来源:args.c


示例12: BGl__callzd2withzd2valuesz00zz__r5_control_features_6_4z00

/* _call-with-values */
	obj_t BGl__callzd2withzd2valuesz00zz__r5_control_features_6_4z00(obj_t
		BgL_envz00_913, obj_t BgL_producerz00_914, obj_t BgL_consumerz00_915)
	{
		AN_OBJECT;
		{	/* Ieee/control5.scm 117 */
			{	/* Ieee/control5.scm 278 */
				obj_t BgL_auxz00_1420;

				obj_t BgL_auxz00_1413;

				if (PROCEDUREP(BgL_consumerz00_915))
					{	/* Ieee/control5.scm 278 */
						BgL_auxz00_1420 = BgL_consumerz00_915;
					}
				else
					{
						obj_t BgL_auxz00_1423;

						BgL_auxz00_1423 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string1520z00zz__r5_control_features_6_4z00,
							BINT(((long) 8393)),
							BGl_string1525z00zz__r5_control_features_6_4z00,
							BGl_string1526z00zz__r5_control_features_6_4z00,
							BgL_consumerz00_915);
						FAILURE(BgL_auxz00_1423, BFALSE, BFALSE);
					}
				if (PROCEDUREP(BgL_producerz00_914))
					{	/* Ieee/control5.scm 278 */
						BgL_auxz00_1413 = BgL_producerz00_914;
					}
				else
					{
						obj_t BgL_auxz00_1416;

						BgL_auxz00_1416 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string1520z00zz__r5_control_features_6_4z00,
							BINT(((long) 8393)),
							BGl_string1525z00zz__r5_control_features_6_4z00,
							BGl_string1526z00zz__r5_control_features_6_4z00,
							BgL_producerz00_914);
						FAILURE(BgL_auxz00_1416, BFALSE, BFALSE);
					}
				return
					BGl_callzd2withzd2valuesz00zz__r5_control_features_6_4z00
					(BgL_auxz00_1413, BgL_auxz00_1420);
			}
		}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:51，代码来源:control5.c


示例13: BGl_localzd2arityzd2zztools_argsz00

/* local-arity */
	BGL_EXPORTED_DEF long BGl_localzd2arityzd2zztools_argsz00(obj_t BgL_argsz00_2)
	{
		AN_OBJECT;
		{	/* Tools/args.scm 59 */
			{
				long BgL_iz00_115;

				obj_t BgL_az00_116;

				{	/* Tools/args.scm 60 */
					obj_t BgL_auxz00_372;

					BgL_iz00_115 = ((long) 0);
					BgL_az00_116 = BgL_argsz00_2;
				BgL_zc3anonymousza31517ze3z83_117:
					if (NULLP(BgL_az00_116))
						{	/* Tools/args.scm 63 */
							BgL_auxz00_372 = BINT(BgL_iz00_115);
						}
					else
						{	/* Tools/args.scm 63 */
							if (PAIRP(BgL_az00_116))
								{	/* Tools/args.scm 65 */
									if (BGl_dssslzd2namedzd2constantzf3zf3zz__dssslz00(CAR
											(BgL_az00_116)))
										{	/* Tools/args.scm 66 */
											BgL_auxz00_372 =
												BGl_dssslzd2arityzd2zztools_dssslz00(BgL_argsz00_2,
												((bool_t) 0));
										}
									else
										{
											obj_t BgL_az00_384;

											long BgL_iz00_382;

											BgL_iz00_382 = (BgL_iz00_115 + ((long) 1));
											BgL_az00_384 = CDR(BgL_az00_116);
											BgL_az00_116 = BgL_az00_384;
											BgL_iz00_115 = BgL_iz00_382;
											goto BgL_zc3anonymousza31517ze3z83_117;
										}
								}
							else
								{	/* Tools/args.scm 65 */
									BgL_auxz00_372 = BINT(NEG((BgL_iz00_115 + ((long) 1))));
						}}
					return (long) CINT(BgL_auxz00_372);
		}}}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:51，代码来源:args.c


示例14: BGl__declarezd2tvectorz12zc0zz__tvectorz00

/* _declare-tvector! */
	obj_t BGl__declarezd2tvectorz12zc0zz__tvectorz00(obj_t BgL_envz00_1640,
		obj_t BgL_idz00_1641, obj_t BgL_allocatez00_1642, obj_t BgL_refz00_1643,
		obj_t BgL_setz00_1644)
	{
		AN_OBJECT;
		{	/* Llib/tvector.scm 139 */
			{	/* Llib/tvector.scm 140 */
				obj_t BgL_auxz00_1782;

				char *BgL_auxz00_1773;

				if (PROCEDUREP(BgL_allocatez00_1642))
					{	/* Llib/tvector.scm 140 */
						BgL_auxz00_1782 = BgL_allocatez00_1642;
					}
				else
					{
						obj_t BgL_auxz00_1785;

						BgL_auxz00_1785 =
							BGl_typezd2errorzd2zz__errorz00(BGl_string2198z00zz__tvectorz00,
							BINT(((long) 5745)), BGl_string2210z00zz__tvectorz00,
							BGl_string2212z00zz__tvectorz00, BgL_allocatez00_1642);
						FAILURE(BgL_auxz00_1785, BFALSE, BFALSE);
					}
				{	/* Llib/tvector.scm 140 */
					obj_t BgL_auxz00_1774;

					if (STRINGP(BgL_idz00_1641))
						{	/* Llib/tvector.scm 140 */
							BgL_auxz00_1774 = BgL_idz00_1641;
						}
					else
						{
							obj_t BgL_auxz00_1777;

							BgL_auxz00_1777 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string2198z00zz__tvectorz00,
								BINT(((long) 5745)), BGl_string2210z00zz__tvectorz00,
								BGl_string2211z00zz__tvectorz00, BgL_idz00_1641);
							FAILURE(BgL_auxz00_1777, BFALSE, BFALSE);
						}
					BgL_auxz00_1773 = BSTRING_TO_STRING(BgL_auxz00_1774);
				}
				return
					BGl_declarezd2tvectorz12zc0zz__tvectorz00(BgL_auxz00_1773,
					BgL_auxz00_1782, BgL_refz00_1643, BgL_setz00_1644);
			}
		}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:51，代码来源:tvector.c


示例15: BGl_inlinezd2setupz12zc0zzinline_walkz00

/* inline-setup! */
	BGL_EXPORTED_DEF obj_t BGl_inlinezd2setupz12zc0zzinline_walkz00(obj_t
		BgL_whatz00_3)
	{
		AN_OBJECT;
		{	/* Inline/walk.scm 93 */
			if ((BgL_whatz00_3 == CNST_TABLE_REF(((long) 0))))
				{	/* Inline/walk.scm 95 */
					BGl_za2inlinezd2modeza2zd2zzinline_walkz00 =
						CNST_TABLE_REF(((long) 0));
					{	/* Inline/walk.scm 98 */
						obj_t BgL_yz00_869;

						BgL_yz00_869 =
							PROCEDURE_ENTRY(BGl_za2inliningzd2kfactorza2zd2zzengine_paramz00)
							(BGl_za2inliningzd2kfactorza2zd2zzengine_paramz00,
							BGl_za2optimza2z00zzengine_paramz00, BEOA);
						return (BGl_za2kfactorza2z00zzinline_walkz00 =
							BGl_2maxz00zz__r4_numbers_6_5z00(BINT(((long) 1)), BgL_yz00_869),
							BUNSPEC);
				}}
			else
				{	/* Inline/walk.scm 95 */
					if ((BgL_whatz00_3 == CNST_TABLE_REF(((long) 6))))
						{	/* Inline/walk.scm 95 */
							BGl_za2inlinezd2modeza2zd2zzinline_walkz00 =
								CNST_TABLE_REF(((long) 6));
							return (BGl_za2kfactorza2z00zzinline_walkz00 =
								BINT(((long) 1)), BUNSPEC);
						}
					else
						{	/* Inline/walk.scm 95 */
							if ((BgL_whatz00_3 == CNST_TABLE_REF(((long) 7))))
								{	/* Inline/walk.scm 95 */
									BGl_za2inlinezd2modeza2zd2zzinline_walkz00 =
										CNST_TABLE_REF(((long) 7));
									return (BGl_za2kfactorza2z00zzinline_walkz00 =
										BINT(((long) 1)), BUNSPEC);
								}
							else
								{	/* Inline/walk.scm 95 */
									return
										BGl_internalzd2errorzd2zztools_errorz00
										(BGl_string3404z00zzinline_walkz00,
										BGl_string3405z00zzinline_walkz00, BgL_whatz00_3);
								}
						}
				}
		}
	}
开发者ID:8l，项目名称:bigloo-llvm，代码行数:50，代码来源:walk.c


示例16: bgl_setgid

/*---------------------------------------------------------------------*/
BGL_RUNTIME_DEF int
bgl_setgid( gid_t gid ) {
#if BGL_HAVE_GETGID
   if( !setgid( gid ) ) {
      return gid;
   } else {
      C_SYSTEM_FAILURE( BGL_ERROR, "setgid", strerror( errno ), BINT( gid ) );
      return gid;
   }
#else
      C_SYSTEM_FAILURE( BGL_ERROR, "setgid",
			"operation not supported", BINT( gid ) );
      return gid;
#endif
}
开发者ID:donaldsonjw，项目名称:bigloo，代码行数:16，代码来源:csystem.c


示例17: BGl__z52setzd2mvalueszd2valz12z40zz__r5_control_features_6_4z00

/* _%set-mvalues-val! */
	obj_t BGl__z52setzd2mvalueszd2valz12z40zz__r5_control_features_6_4z00(obj_t
		BgL_envz00_908, obj_t BgL_nz00_909, obj_t BgL_oz00_910)
	{
		AN_OBJECT;
		{	/* Ieee/control5.scm 84 */
			{	/* Ieee/control5.scm 85 */
				int BgL_nz00_928;

				{	/* Ieee/control5.scm 85 */
					obj_t BgL_auxz00_962;

					if (INTEGERP(BgL_nz00_909))
						{	/* Ieee/control5.scm 85 */
							BgL_auxz00_962 = BgL_nz00_909;
						}
					else
						{
							obj_t BgL_auxz00_965;

							BgL_auxz00_965 =
								BGl_typezd2errorzd2zz__errorz00
								(BGl_string1520z00zz__r5_control_features_6_4z00,
								BINT(((long) 3343)),
								BGl_string1524z00zz__r5_control_features_6_4z00,
								BGl_string1522z00zz__r5_control_features_6_4z00, BgL_nz00_909);
							FAILURE(BgL_auxz00_965, BFALSE, BFALSE);
						}
					BgL_nz00_928 = CINT(BgL_auxz00_962);
				}
				return BGL_MVALUES_VAL_SET(BgL_nz00_928, BgL_oz00_910);
			}
		}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:34，代码来源:control5.c


示例18: BGl_zb2zd2arityz60zztools_argsz00

/* +-arity */
	BGL_EXPORTED_DEF obj_t BGl_zb2zd2arityz60zztools_argsz00(obj_t
		BgL_arityz00_15, obj_t BgL_addz00_16)
	{
		AN_OBJECT;
		{	/* Tools/args.scm 176 */
			if (((long) CINT(BgL_arityz00_15) >= ((long) 0)))
				{	/* Tools/args.scm 177 */
					return
						BINT(((long) CINT(BgL_addz00_16) + (long) CINT(BgL_arityz00_15)));
				}
			else
				{	/* Tools/args.scm 177 */
					return
						BINT(((long) CINT(BgL_arityz00_15) - (long) CINT(BgL_addz00_16)));
		}}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:17，代码来源:args.c


示例19: BGl_killzd2myzd2selfz00zzengine_signalsz00

/* kill-my-self */
	obj_t BGl_killzd2myzd2selfz00zzengine_signalsz00(obj_t BgL_envz00_100,
		obj_t BgL_nz00_101)
	{
		AN_OBJECT;
		{	/* Engine/signals.scm 25 */
			{
				obj_t BgL_nz00_87;

				BgL_nz00_87 = BgL_nz00_101;
				{	/* Engine/signals.scm 26 */
					obj_t BgL_port1508z00_89;

					{	/* Engine/signals.scm 26 */
						obj_t BgL_res1510z00_92;

						{	/* Engine/signals.scm 26 */
							obj_t BgL_auxz00_117;

							BgL_auxz00_117 = BGL_CURRENT_DYNAMIC_ENV();
							BgL_res1510z00_92 = BGL_ENV_CURRENT_ERROR_PORT(BgL_auxz00_117);
						}
						BgL_port1508z00_89 = BgL_res1510z00_92;
					}
					bgl_display_string(BGl_string1512z00zzengine_signalsz00,
						BgL_port1508z00_89);
					bgl_display_string(BGl_string1513z00zzengine_signalsz00,
						BgL_port1508z00_89);
					bgl_display_obj(BgL_nz00_87, BgL_port1508z00_89);
					bgl_display_char(((unsigned char) '\n'), BgL_port1508z00_89);
				}
				return BGl_compilerzd2exitzd2zzinit_mainz00(BINT(((long) 2)));
		}}
	}
开发者ID:8l，项目名称:bigloo-llvm，代码行数:34，代码来源:signals.c


示例20: BGl_makezd2vazd2protoz00zztools_argsz00

/* make-va-proto */
	obj_t BGl_makezd2vazd2protoz00zztools_argsz00(obj_t BgL_nz00_184,
		long BgL_countz00_185)
	{
		AN_OBJECT;
		{	/* Tools/args.scm 162 */
			if (((long) CINT(BgL_nz00_184) == ((long) -1)))
				{	/* Tools/args.scm 159 */
					return BGl_makezd2argszd2namez00zztools_argsz00(BgL_countz00_185);
				}
			else
				{	/* Tools/args.scm 161 */
					obj_t BgL_arg1567z00_188;

					obj_t BgL_arg1568z00_189;

					BgL_arg1567z00_188 =
						BGl_makezd2argszd2namez00zztools_argsz00(BgL_countz00_185);
					{	/* Tools/args.scm 162 */
						long BgL_arg1570z00_190;

						long BgL_arg1571z00_191;

						BgL_arg1570z00_190 = ((long) CINT(BgL_nz00_184) + ((long) 1));
						BgL_arg1571z00_191 = (BgL_countz00_185 + ((long) 1));
						BgL_arg1568z00_189 =
							BGl_makezd2vazd2protoz00zztools_argsz00(BINT(BgL_arg1570z00_190),
							BgL_arg1571z00_191);
					}
					return MAKE_PAIR(BgL_arg1567z00_188, BgL_arg1568z00_189);
				}
		}
	}
开发者ID:mbrock，项目名称:bigloo-llvm，代码行数:33，代码来源:args.c



注：本文中的BINT函数示例整理自Github/MSDocs等源码及文档管理平台，相关代码片段筛选自各路编程大神贡献的开源项目，源码版权归原作者所有，传播和使用请参考对应项目的License；未经允许，请勿转载。

鲜花
握手
雷人
路过
鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
More+
上一篇：
C++ BIOS_start函数代码示例发布时间：2022-05-30
下一篇：
C++ BIND_ENUM_CONSTANT函数代码示例发布时间：2022-05-30
热门推荐
More+
热门话题
More+
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服（服务时间 9:00～18:00）

在线QQ客服
地址：深圳市南山区西丽大学城创智工业园
电邮：jeky_zhao#qq.com
移动电话：139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap