From 4bc5270f346d1b63b9ec20613f3221867d5af932 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Sun, 19 Apr 2020 19:32:30 +0000
Subject: [PATCH] * jump to PASCALMAIN in the ZX Spectrum startup code

git-svn-id: branches/z80@44868 -
---
 rtl/zxspectrum/prt0.asm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/rtl/zxspectrum/prt0.asm b/rtl/zxspectrum/prt0.asm
index 9e329a368b..7941342a5a 100644
--- a/rtl/zxspectrum/prt0.asm
+++ b/rtl/zxspectrum/prt0.asm
@@ -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