Browse Source

* typo error fix in STORENUMBER code

pierre 26 years ago
parent
commit
3cd628d2f2
1 changed files with 5 additions and 2 deletions
  1. 5 2
      compiler/symdef.inc

+ 5 - 2
compiler/symdef.inc

@@ -2989,7 +2989,7 @@ Const local_symtable_index : longint = $8001;
          aktrecordsymtable:=publicsyms;
          aktrecordsymtable:=publicsyms;
          { nun die Definitionen dereferenzieren }
          { nun die Definitionen dereferenzieren }
 {$ifdef STORENUMBER}
 {$ifdef STORENUMBER}
-         hp:=pdef(publicsyms^.symindex^.first);
+         hp:=pdef(publicsyms^.defindex^.first);
 {$else}
 {$else}
          hp:=publicsyms^.rootdef;
          hp:=publicsyms^.rootdef;
 {$endif}
 {$endif}
@@ -3472,7 +3472,10 @@ Const local_symtable_index : longint = $8001;
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.101  1999-04-14 09:14:58  peter
+  Revision 1.102  1999-04-17 22:01:28  pierre
+   * typo error fix in STORENUMBER code
+
+  Revision 1.101  1999/04/14 09:14:58  peter
     * first things to store the symbol/def number in the ppu
     * first things to store the symbol/def number in the ppu
 
 
   Revision 1.100  1999/04/08 15:57:51  peter
   Revision 1.100  1999/04/08 15:57:51  peter