shithub: mc

Info  •  Files  •  Log  •  Branches

Fix build.

--- a/lib/crypto/clear.myr

+++ b/lib/crypto/clear.myr

@@ -9,11 +9,11 @@

 ;;

 generic clear = {p : @a#

-	std.memfill(p, 0, sizeof(@a))

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

 }

-generic slclear = {p : @a[:]

-	std.memfill(sl, 0, sizeof(@a)*sl.len)

+generic slclear = {sl : @a[:]

+	std.memfill((sl : byte#), 0, sizeof(@a)*sl.len)

 }

 generic free = {p : @a#

@@ -22,6 +22,6 @@

 }

 generic slfree = {sl : @a[:]

-	slclear(p)

-	std.slfree(p)

+	slclear(sl)

+	std.slfree(sl)

 }

--- a/lib/std/memops.myr

+++ b/lib/std/memops.myr

@@ -1,8 +1,8 @@

 use "types"

 pkg std =

-	pkglocal extern const memblit	: (dst : byte#, src : byte#, len : std.size -> void)

-	pkglocal extern const memfill	: (dst : byte#, val : byte, len : std.size -> void)

-	pkglocal extern const memeq	: (a : byte#, b : byte#, len : std.size -> bool)

+	extern const memblit	: (dst : byte#, src : byte#, len : std.size -> void)

+	extern const memfill	: (dst : byte#, val : byte, len : std.size -> void)

+	extern const memeq	: (a : byte#, b : byte#, len : std.size -> bool)

 ;;