[Bug-apl] Locked functions do not stay locked after )LOAD

[Blake McBride]

      )CLEAR
CLEAR WS
      ∇z←test
[1] z←5 5⍴⍳25
[2] ⍫
      test
 1  2  3  4  5
 6  7  8  9 10
11 12 13 14 15
16 17 18 19 20
21 22 23 24 25
      ∇test[⎕]∇
DEFN ERROR+
      ∇test[⎕]∇
              ^
      )SAVE abc
2014-05-15  10:40:56 (GMT-5)
      )LOAD abc
SAVED 2014-5-15  15:40:56 (GMT-5)
      test
 1  2  3  4  5
 6  7  8  9 10
11 12 13 14 15
16 17 18 19 20
21 22 23 24 25
      ∇test[⎕]∇
    ∇
[0]   z←test
[1]   z←5 5⍴⍳25
    ∇