1. 检查变量是否被正确地初始化或赋值。如果没有，对其进行初始化或赋值。 例如，下面的代码中，x没有被定义或赋值，因此在打印语句中使用它将导致'Variable is NIL when it shouldn't be”错误。

VAR
  y : INTEGER;

BEGIN
  WriteLn(x); { this will raise a "Variable is NIL when it shouldn't be" error }
END.

修复方法是将变量x初始化或赋值。

VAR
  x, y : INTEGER;

BEGIN
  x := 0; { initialize x }
  WriteLn(x); { this will print 0 }
END.

2. 检查变量是否被错误地修改或清空。如果是，恢复它的正确值。 例如，下面的代码中，x被定义并初始化，但在下面的过程调用中被错误地赋值为NIL，导致'Variable is NIL when it shouldn't be”错误。

VAR
  x : INTEGER;

PROCEDURE Foo(VAR x : INTEGER);
BEGIN
  x := NIL; { this should not be done }
END;

BEGIN
  x := 42; { initialize x }
  Foo(x); { this will raise a "Variable is NIL when it shouldn't be" error }
  WriteLn(x);
END.

修复方法是避免错误地修改变量x。

VAR
  x : INTEGER;

PROCEDURE Foo(VAR x : INTEGER);
BEGIN
  { do something else with x }
END;

BEGIN
  x := 42; { initialize x }
  Foo(x); { this will not raise an error }
  WriteLn(x);
END.