LCOV - differential code coverage report
Current view: top level - contrib/bool_plperl - bool_plperl.c (source / functions) Coverage Total Hit CBC
Current: Differential Code Coverage HEAD vs 15 Lines: 100.0 % 11 11 11
Current Date: 2023-04-08 17:13:01 Functions: 100.0 % 5 5 5
Baseline: 15 Line coverage date bins:
Baseline Date: 2023-04-08 15:09:40 (240..) days: 100.0 % 11 11 11
Legend: Lines: hit not hit Function coverage date bins:
(240..) days: 100.0 % 5 5 5

 Age         Owner                  TLA  Line data    Source code
                                  1                 : #include "postgres.h"
                                  2                 : 
                                  3                 : #include "fmgr.h"
                                  4                 : #include "plperl.h"
                                  5                 : 
                                  6                 : 
 1129 tgl                         7 CBC           2 : PG_MODULE_MAGIC;
                                  8                 : 
                                  9               4 : PG_FUNCTION_INFO_V1(bool_to_plperl);
                                 10                 : 
                                 11                 : Datum
                                 12               8 : bool_to_plperl(PG_FUNCTION_ARGS)
                                 13                 : {
                                 14               8 :     dTHX;
                                 15               8 :     bool        in = PG_GETARG_BOOL(0);
                                 16                 : 
                                 17               8 :     return PointerGetDatum(in ? &PL_sv_yes : &PL_sv_no);
                                 18                 : }
                                 19                 : 
                                 20                 : 
                                 21               4 : PG_FUNCTION_INFO_V1(plperl_to_bool);
                                 22                 : 
                                 23                 : Datum
                                 24               8 : plperl_to_bool(PG_FUNCTION_ARGS)
                                 25                 : {
                                 26               8 :     dTHX;
                                 27               8 :     SV         *in = (SV *) PG_GETARG_POINTER(0);
                                 28                 : 
                                 29               8 :     PG_RETURN_BOOL(SvTRUE(in));
                                 30                 : }
        

Generated by: LCOV version v1.16-55-g56c0a2a