コード例 #1
0
ファイル: hsgclosure.c プロジェクト: gitter-badger/haskell-gi
/* Same as freeHaskellFunctionPtr, but it does nothing when given a
   null pointer, instead of crashing */
void safeFreeFunPtr(void *ptr)
{
  if (ptr != NULL)
    freeHaskellFunctionPtr(ptr);
}
コード例 #2
0
ファイル: HsFFI.c プロジェクト: 23Skidoo/ghc
void
hs_free_fun_ptr(HsFunPtr fp)
{
    /* I simply *love* all these similar names... */
    freeHaskellFunctionPtr(fp);
}