From f3ae2000ba22de490a90322eb4027bac3dffd690 Mon Sep 17 00:00:00 2001 From: Moe Jette <jette1@llnl.gov> Date: Mon, 4 Feb 2008 18:42:27 +0000 Subject: [PATCH] fix a couple more changes in slurm v1.3 RPCs --- contribs/perlapi/libslurm-perl/job.c | 3 +-- contribs/perlapi/libslurm-perl/launch.c | 1 + 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/contribs/perlapi/libslurm-perl/job.c b/contribs/perlapi/libslurm-perl/job.c index b84d60e303e..f08d76db91d 100644 --- a/contribs/perlapi/libslurm-perl/job.c +++ b/contribs/perlapi/libslurm-perl/job.c @@ -78,7 +78,6 @@ job_info_to_hv(job_info_t* job_info, HV* hv) STORE_FIELD(hv, job_info, job_min_cores, uint16_t); STORE_FIELD(hv, job_info, job_min_threads, uint16_t); STORE_FIELD(hv, job_info, job_min_memory, uint32_t); - STORE_FIELD(hv, job_info, job_max_memory, uint32_t); STORE_FIELD(hv, job_info, job_min_tmp_disk, uint32_t); if(job_info->req_nodes) STORE_FIELD(hv, job_info, req_nodes, charp); @@ -88,7 +87,7 @@ job_info_to_hv(job_info_t* job_info, HV* hv) /* TODO: exc_node_inx */ if(job_info->features) STORE_FIELD(hv, job_info, features, charp); - STORE_FIELD(hv, job_info, dependency, uint32_t); + STORE_FIELD(hv, job_info, dependency, charp); STORE_FIELD(hv, job_info, exit_code, uint32_t); if(job_info->account) STORE_FIELD(hv, job_info, account, charp); diff --git a/contribs/perlapi/libslurm-perl/launch.c b/contribs/perlapi/libslurm-perl/launch.c index 1ab2e8c79a8..4ff53cfe1f9 100644 --- a/contribs/perlapi/libslurm-perl/launch.c +++ b/contribs/perlapi/libslurm-perl/launch.c @@ -29,6 +29,7 @@ hv_to_slurm_step_ctx_params(HV* hv, slurm_step_ctx_params_t* params) FETCH_FIELD(hv, params, node_list, charp, FALSE); FETCH_FIELD(hv, params, network, charp, FALSE); FETCH_FIELD(hv, params, overcommit, bool, FALSE); + FETCH_FIELD(hv, params, mem_per_task, uint16_t, FALSE) return 0; } -- GitLab