diff --git a/mach/m68k4/libem/dia.s b/mach/m68k4/libem/dia.s
index 26b318374..4ed816f23 100644
--- a/mach/m68k4/libem/dia.s
+++ b/mach/m68k4/libem/dia.s
@@ -114,7 +114,7 @@ putchar:
 	move.l	#1, -(sp)
 	pea	11(sp)
 	move.l	#1, -(sp)
-	jsr	__write
+	jsr	WRITE
 	lea	12(sp), sp
 	rts
 .align 2
diff --git a/mach/m68k4/libem/shp.s b/mach/m68k4/libem/shp.s
index 9f3ce3d0a..ff09bc10d 100644
--- a/mach/m68k4/libem/shp.s
+++ b/mach/m68k4/libem/shp.s
@@ -13,7 +13,7 @@
 	and.l	#~0x3ff, d1
 	move.l	d1, -(sp)
 	move.l	d1,.limhp
-	jsr	__brk		! allocate 1K bytes of extra storage
+	jsr	BRK		! allocate 1K bytes of extra storage
 	add.l	#4, sp
 	tst.l	d0
 	bne	2f