diff --git a/libsrc/runtime/icmp.s b/libsrc/runtime/icmp.s
index c3c37e726..70bcb76bd 100644
--- a/libsrc/runtime/icmp.s
+++ b/libsrc/runtime/icmp.s
@@ -5,10 +5,13 @@
 ; Integer compare function - used by the compare operators
 ;
 
-	.export		tosicmp
-	.importzp	sp, sreg
+	.export	    	tosicmp, tosicmp0
+	.importzp   	sp, sreg
 
 
+tosicmp0:
+        ldx     #$00
+
 tosicmp:
 	sta	sreg
 	stx	sreg+1		; Save ax