diff --git a/STATUS.md b/STATUS.md
index 96d2da0c..92e8e0cd 100644
--- a/STATUS.md
+++ b/STATUS.md
@@ -79,7 +79,7 @@ Not all of them - only these we want to have implemented.
 | `$A68E`   | RUNC         | NOT DONE |                                                    |
 | `$A7AE`   | NEWSTT       | NOT DONE |                                                    |
 | `$AB1E`   | STROUT       | DONE     |                                                    |
-| `$BDCD`   | LINPRT       | NOT DONE |                                                    |
+| `$BDCD`   | LINPRT       | DONE     | temporary implementation                           |
 | `$E3BF`   | INIT         | NOT DONE |                                                    |
 | `$E422`   | INITMSG      | DONE     |                                                    |
 | `$E453`   | RVECT        | NOT DONE |                                                    |
diff --git a/c64/basic/bdcd.linprt.s b/c64/basic/bdcd.linprt.s
index 32afbf1b..7e58bebe 100644
--- a/c64/basic/bdcd.linprt.s
+++ b/c64/basic/bdcd.linprt.s
@@ -7,4 +7,6 @@
 
 
 LINPRT:
-	STUB_IMPLEMENTATION()
+	// XXX This is temporary, to allow some software to work!
+	//     To be replaced by real impleementation.
+	jmp print_integer