shithub: mc

Info  •  Files  •  Log  •  Branches

Speed up std.clear

--- a/lib/std/clear.myr

+++ b/lib/std/clear.myr

@@ -1,4 +1,4 @@

-use "slfill"

+use "memops"

 pkg std =

 	generic clear	: (p : @a#	-> void)

@@ -5,9 +5,6 @@

 ;;

 generic clear = {p : @a#

-	var bp

-

-	bp = (p : byte#)

-	slfill(bp[:sizeof(@a)], 0)

+	memfill((p : byte#), 0, sizeof(@a))

 }