Trisurf Monte Carlo simulator
Samo Penic
2018-09-25 be48625a2f6b43817e783c6eefd061e397ceac73
src/io.c
@@ -1,3 +1,4 @@
/* vim: set ts=4 sts=4 sw=4 noet : */
#include "general.h"
#include<stdio.h>
@@ -1145,6 +1146,7 @@
ts_tape *parsetapebuffer(char *buffer){
    ts_tape *tape=(ts_tape *)calloc(1,sizeof(ts_tape));
    tape->multiprocessing=calloc(255,sizeof(char));
   double floatdummyxkA0, floatdummystretch;
    cfg_opt_t opts[] = {
        CFG_SIMPLE_INT("nshell", &tape->nshell),
@@ -1174,8 +1176,8 @@
        CFG_SIMPLE_INT("iterations",&tape->iterations),
   CFG_SIMPLE_INT("mcsweeps",&tape->mcsweeps),
   CFG_SIMPLE_INT("inititer", &tape->inititer),
        CFG_SIMPLE_BOOL("quiet",&tape->quiet),
        CFG_SIMPLE_STR("multiprocessing",tape->multiprocessing),
            CFG_SIMPLE_BOOL("quiet",(cfg_bool_t *)&tape->quiet),
        CFG_SIMPLE_STR("multiprocessing",&tape->multiprocessing),
        CFG_SIMPLE_INT("smp_cores",&tape->brezveze0),
        CFG_SIMPLE_INT("cluster_nodes",&tape->brezveze1),
        CFG_SIMPLE_INT("distributed_processes",&tape->brezveze2),
@@ -1184,6 +1186,11 @@
   CFG_SIMPLE_FLOAT("c0",&tape->c0),
   CFG_SIMPLE_FLOAT("w",&tape->w),
   CFG_SIMPLE_FLOAT("F",&tape->F),
   CFG_SIMPLE_FLOAT("stretchswitch", &floatdummystretch),
   CFG_SIMPLE_FLOAT("xkA0", &floatdummyxkA0),
   CFG_SIMPLE_INT("plane_confinement_switch", &tape->plane_confinement_switch),
   CFG_SIMPLE_FLOAT("plane_d", &tape->plane_d),
   CFG_SIMPLE_FLOAT("plane_F", &tape->plane_F),
        CFG_END()
    };
    cfg_t *cfg;    
@@ -1218,6 +1225,8 @@
ts_bool getcmdline_tape(cfg_t *cfg, char *opts){
   char *commands, *backup, *saveptr, *saveopptr, *command, *operator[2];
   operator[0]=0;
   operator[1]=0;
   ts_uint i,j;
   commands=(char *)malloc(10000*sizeof(char));
    backup=commands; //since the pointer to commands will be lost, we acquire a pointer that will serve as backup.