C++ (Cpp) pic_list1の例

コード例 #1

ファイル: pair.c プロジェクト: ktakashi/picrin

pic_value
pic_list2(pic_state *pic, pic_value obj1, pic_value obj2)
{
  size_t ai = pic_gc_arena_preserve(pic);
  pic_value val;

  val = pic_cons(pic, obj1, pic_list1(pic, obj2));

  pic_gc_arena_restore(pic, ai);
  pic_gc_protect(pic, val);
  return val;
}

コード例 #2

ファイル: cont.c プロジェクト: hopkinsr/picrin

pic_value
pic_values1(pic_state *pic, pic_value arg1)
{
  return pic_values_by_list(pic, pic_list1(pic, arg1));
}