<commit_before>module PGSchedule () where

import Data.Time

import Foreign.C.Types
import Foreign.C.String
import Foreign.Ptr
import Foreign.Storable
import Foreign.Marshal.Alloc (free)
import Foreign.Marshal.Array (newArray)
import Data.ByteString.Unsafe (unsafePackCString)
import qualified Data.Text.Encoding as T
import Sigym4.Dimension.CronSchedule
import Sigym4.Dimension

#include "postgres.h"
#include "pgtime.h"
#include "schedule.h"

{#enum PGScheduleError {} deriving (Eq,Show) #}


newtype PGTime = PGTime UTCTime deriving Show

{#pointer * pg_tm as PGTime nocode#}

instance Storable PGTime where
  sizeOf _ = {#sizeof pg_tm #}
  alignment _ = {#alignof pg_tm #}
  peek = fmap PGTime . peekUTCTime<commit_msg>cleanup<commit_after>module PGSchedule () where

import Data.Time

import Foreign.C.Types
import Foreign.C.String
import Foreign.Ptr
import Foreign.Storable
import Foreign.Marshal.Alloc (free)
import Foreign.Marshal.Array (newArray)
import Data.ByteString.Unsafe (unsafePackCString)
import qualified Data.Text.Encoding as T
import Sigym4.Dimension.CronSchedule
import Sigym4.Dimension

#include "postgres.h"
#include "pgtime.h"
#include "schedule.h"

{#enum PGScheduleError {} deriving (Eq,Show) #}

newtype PGTime = PGTime UTCTime deriving Show

instance Storable PGTime where
  sizeOf _ = {#sizeof pg_tm #}
  alignment _ = {#alignof pg_tm #}
  peek = fmap PGTime . peekUTCTime
{'fraction_non_alphanumeric': 0.09350463954318344, 'fraction_numerical': 0.0028551034975017845, 'mean_word_length': 5.343891402714932, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '4066736', 'n_tokens_mistral': 463, 'n_tokens_neox': 458, 'n_words': 126}