| 119 | } |
| 120 | |
| 121 | txSlot* fxNextIntegerProperty(txMachine* the, txSlot* property, txInteger integer, txID id, txFlag flag) |
| 122 | { |
| 123 | property = property->next = fxNewSlot(the); |
| 124 | property->flag = flag; |
| 125 | property->ID = id; |
| 126 | property->kind = XS_INTEGER_KIND; |
| 127 | property->value.integer = integer; |
| 128 | return property; |
| 129 | } |
| 130 | |
| 131 | txSlot* fxNextNumberProperty(txMachine* the, txSlot* property, txNumber number, txID id, txFlag flag) |
| 132 | { |
no test coverage detected