String#*

Phrogz · Jun 30, 2008 · a28f14a · a28f14a
1 parent a849d5c
commit a28f14a
Showing 1 changed file with 14 additions and 0 deletions.
diff --git a/core/string.lua b/core/string.lua
@@ -2,6 +2,20 @@ String['+'] = createLuaFunc( 'stringToAppend', function( context ) -- String#+
 	return runtime.string[ runtime.luastring[context.self] .. toLuaString( context.stringToAppend ) ]
 end )
 
+String['*'] = createLuaFunc( 'reps', function( context ) -- String#*
+	local string = runtime.luastring[ context.self ]
+	local reps   = runtime.luanumber[ context.reps ]
+	if not reps then
+		local theNextMessageOrLiteral = context.message.next
+		if theNextMessageOrLiteral == Lawn['nil'] then
+			error( "String#* is missing a repetition count" )
+		end
+		context.owningContext.nextMessage = theNextMessageOrLiteral.next
+		rvalue = runtime.luanumber[ sendMessage( context.owningContext, theNextMessageOrLiteral ) ]
+	end
+	return runtime.string[ string.rep( string, reps ) ]
+end )
+
 String.asCode = createLuaFunc( function( context ) -- String#asCode
 	return runtime.string[ string.format( "%q", runtime.luastring[context.self] ) ]
 end )