Anonymous user
Doubly-linked list/Definition: Difference between revisions
→{{header|M2000 Interpreter}}
No edit summary |
|||
Line 1,497:
=={{header|M2000 Interpreter}}==
M2000 from 9th version has pointers for groups. Also there is IS operator to check if two pointers are the same. There is no Null pointer except ->0 for groups which decrement object reference counter. So here we use a Null class to define an empty group and then we make a global pointer Null to hold that and compare it with Is operator later.
To check that all works we have to use deconstructor ( Remove {}) which call with Clear statement if only one reference exist. So when we remove from list nodes we check it if destroyed, visually.
We can use ? as print.
<lang M2000 Interpreter>
Module Checkit {
Line 1,667 ⟶ 1,673:
Checkit
</lang>
=={{header|Nim}}==
|