Home Explore Help
Sign In
pascal
/
fpc
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* jump to PASCALMAIN in the ZX Spectrum startup code

git-svn-id: branches/z80@44868 -
nickysn 5 years ago
parent
77058d0877
commit
4bc5270f34
1 changed files with 2 additions and 2 deletions
Split View Show Diff Stats
  1. 2 2
      rtl/zxspectrum/prt0.asm

+ 2 - 2
rtl/zxspectrum/prt0.asm
View File 

@@ -1,10 +1,10 @@
 
                         .area _CODE
 
-                        .globl _todo_pascal_main_
 
+                        .globl PASCALMAIN
 
                         .globl FPC_SAVE_IY
 
 start::
 
                         ld sp, #stack_area_end
 
                         ld (FPC_SAVE_IY), iy
 
-                        jp _todo_pascal_main_
 
+                        jp PASCALMAIN
 
 
                         .area _DATA
 
 stack_area_start:       .rs 1022