← Back to branch summary

~ubuntu-branches/ubuntu/trusty/lifelines/trusty

« back to all changes in this revision

Viewing changes to src/interp/write.c

  • Committer: Bazaar Package Importer
  • Author(s): Felipe Augusto van de Wiel (faw)
  • Date: 2007-08-14 00:02:04 UTC
  • mfrom: (1.1.4 upstream) (3.1.4 gutsy)
  • Revision ID: james.westby@ubuntu.com-20070814000204-mpv5faygl0dgq3qi
Tags: 3.0.61-1
http://bugs.debian.org/387856
http://bugs.debian.org/424543
http://bugs.debian.org/396206
http://bugs.debian.org/405501
* New upstream release. (Closes: #387856).
* Fixing documentation build problems also fixes FTBFS if built twice in a
  row. (Closes: #424543).
* Adding lynx as a build dependency. This is necessary to generate txt files
  from html, discovered while fixing #424543.
* Upstream fix: charset for gedcom file in unicode. (Closes: #396206).
* Upstream fim: updating documentation about desc-tex2. (Closes: #405501).
* Bumping Standards-Version to 3.7.2 without package changes.
* Dropping local debian patches added upstream.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/interp/write.c
45
45
llrpt_createnode (PNODE node, SYMTAB stab, BOOLEAN *eflg)
46
46
{
47
47
        PNODE arg = iargs(node);
48
 
        NODE newnode=0, prnt=NULL;
49
 
        PVALUE val1, val2;
50
 
        STRING str1, str2;
 
48
        NODE newnode=0;
 
49
        NODE prnt=NULL; /* parent node for new node */
 
50
        STRING xref=NULL; /* xref for new node */
 
51
        PVALUE val1=NULL, val2=NULL;
 
52
        STRING str1=NULL; /* 1st arg, which is tag for new node */
 
53
        STRING str2=NULL; /* 2nd arg, which is value for new node */
51
54
        val1 = eval_and_coerce(PSTRING, arg, stab, eflg);
52
55
        if (*eflg) {
53
56
                prog_var_error(node, stab, arg, val1, nonstrx, "createnode", "1");
54
57
                delete_pvalue(val1);
55
58
                return NULL;
56
59
        }
 
60
        /* 1st arg is tag for new node */
57
61
        str1 = pvalue_to_string(val1);
58
62
        val2 = eval_and_coerce(PSTRING, arg=inext(arg), stab, eflg);
59
63
        if (*eflg) {
61
65
                delete_pvalue(val2);
62
66
                return NULL;
63
67
        }
 
68
        /* 2nd arg is value for new node */
64
69
        str2 = pvalue_to_string(val2);
65
 
        newnode = create_temp_node(NULL, str1, str2, prnt);
 
70
        newnode = create_temp_node(xref, str1, str2, prnt);
66
71
        return create_pvalue_from_node(newnode);
67
72
}
68
73
/*=======================================