Update parameter count for cputc-native-user in XS:Lisp

BrickBot · Jul 23, 2024 · 440b810 · 440b810
1 parent 9604683
commit 440b810
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/xs/lisp/front.c b/xs/lisp/front.c
@@ -614,7 +614,7 @@ void initGlobals() {
 	def("puts", MKCONST(Lputs,1,0,0));
 	def("putc", MKCONST(Lputc,2,0,0));
 	def("putc-native", MKCONST(Lputc_native,2,0,0));
-	def("putc-native-user", MKCONST(Lputc_native_user,3,0,0));
+	def("putc-native-user", MKCONST(Lputc_native_user,4,0,0));
 	def("cls", MKCONST(Lcls,0,0,0));
 	def("battery", MKCONST(Lbattery,0,0,0));
 	def("reset-time", MKCONST(Lreset_time,0,0,0));