Overview
| Artifact ID: | db082c2ce6e552515b7c1fc7f0bf8116183af88f |
|---|---|
| Ticket: | 842408ffffffffffffffffffffffffffffffffff |
| Date: | 2003-11-15 04:22:40 |
| User: | eriklns |
| Artifact Attached: | 26d73f5df6c5edfe099798b1970525956fa28cd5 |
| Filename: | diff.txt |
| Description: |
Content:
677a678,681
> } else {
> # the preferred item is not available
> # don't set the variable `item'
> set index pref_unavail
684,689c688,696
< # do the actual allocation
< set pool(freeitems) [lreplace $pool(freeitems) $index $index]
< if { [string length $allocID] } {
< set state($item) $allocID
< } else {
< set state($item) dummyID
---
> if { [string compare pref_unavail $index] } {
> # do the actual allocation
> set pool(freeitems) [lreplace $pool(freeitems) $index $index]
> if { [string length $allocID] } {
> set state($item) $allocID
> } else {
> set state($item) dummyID
> }
> set allocated 1
691d697
< set allocated 1