Changeset 198


Ignore:
Timestamp:
Dec 4, 2009 5:02:02 PM (11 years ago)
Author:
toby
Message:

# on 2000/06/09 03:44:35, toby did:
avoid error when sorting atoms with ALL as atom #

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/atomcons.tcl

    • Property rcs:date changed from 2000/06/01 02:47:26 to 2000/06/09 03:44:35
    • Property rcs:rev changed from 1.4 to 1.5
    r180 r198  
    6868    catch {unset varlist}
    6969    while {[set clist [constrinfo atom get [incr i]]] != -1} {
    70         set clist [lsort -integer -index 1 $clist]
     70        set clist [lsort -index 1 $clist]
    7171        if {$expcons(sortmode) == "num"} {
    7272            set sortvar $i
Note: See TracChangeset for help on using the changeset viewer.