* h_program-lang/database_code.ml: adding privacy