Ticket #22870: muniversal-1.0.tcl.diff

File muniversal-1.0.tcl.diff, 4.2 KB (added by pguyot (Paul Guyot), 15 years ago)

Patch to merge .la files with muniversal group

  • muniversal-1.0.tcl

     
    484484                                                copy ${dir1}/${fl} ${dir}/mods64
    485485                                            }
    486486                                        }
    487                                         *.la -
     487                                        *.la {
     488                                            set known_file "yes"
     489                                            set la1_channel [open ${dir1}/${fl}]
     490                                            set la2_channel [open ${dir2}/${fl}]
     491                                            set la1_data [read $la1_channel]
     492                                            set la2_data [read $la2_channel]
     493                                            close $la1_channel
     494                                            close $la2_channel
     495                                            set la1_lines [split $la1_data \n]
     496                                            set la2_lines [split $la2_data \n]
     497                                            if {[llength la1_lines] == [llength la2_lines]} {
     498                                                set lam_channel [open ${dir}/${fl} w]
     499                                                foreach la1_line $la1_lines la2_line $la2_lines {
     500                                                    if {$la1_line == $la2_line} {
     501                                                        puts $lam_channel $la1_line
     502                                                    } else {
     503                                                        if {[regexp -nocase {(.*?)='(.*)'} $la1_line la1_fmatch la1_key la1_value] && [regexp -nocase {(.*?)='(.*)'} $la2_line la1_fmatch la2_key la2_value] && ${la1_key} == ${la2_key}} {
     504                                                            if {${la1_key} == "dependency_libs"} {
     505                                                                set merged_value ${la1_value}
     506                                                                foreach value2 ${la2_value} {
     507                                                                    if {[lsearch -exact ${merged_value} ${value2}] < 0} {
     508                                                                        set merged_value "${merged_value} ${value2}"
     509                                                                    }
     510                                                                }
     511                                                                puts $lam_channel "${la1_key}='${merged_value}'"
     512                                                            } else {
     513                                                                close ${lam_channel}
     514                                                                return -code error "${prefixDir}/${fl} differs in ${base1} and ${base2} and cannot be merged (cannot merge key ${la1_key})\nline1: ${la1_line}\nline2: ${la2_line}"
     515                                                            }
     516                                                        } else {
     517                                                            close ${lam_channel}
     518                                                            return -code error "${prefixDir}/${fl} differs in ${base1} and ${base2} and cannot be merged (mismatching keys)\nline1: ${la1_line}\nline2: ${la2_line}"
     519                                                        }
     520                                                    }
     521                                                }
     522                                                close ${lam_channel}
     523                                            } else {
     524                                                return -code error "${prefixDir}/${fl} differs in ${base1} and ${base2} and cannot be merged (different number of lines)"
     525                                            }
     526                                        }
    488527                                        *.pc -
    489528                                        *-config {
    490529                                            return -code error "${prefixDir}/${fl} differs in ${base1} and ${base2} and cannot be merged"