Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/windirstat/premake-4.x-stable.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'src/script/fn_solution.c')
-rw-r--r--src/script/fn_solution.c67
1 files changed, 0 insertions, 67 deletions
diff --git a/src/script/fn_solution.c b/src/script/fn_solution.c
deleted file mode 100644
index ba3e852..0000000
--- a/src/script/fn_solution.c
+++ /dev/null
@@ -1,67 +0,0 @@
-/**
- * \file fn_solution.c
- * \brief Create or select a solution object.
- * \author Copyright (c) 2002-2008 Jason Perkins and the Premake project
- */
-
-#include "premake.h"
-#include "script_internal.h"
-
-
-/**
- * Create a new solution object, or select an existing one.
- */
-int fn_solution(lua_State* L)
-{
- const char* name;
-
- /* if there are no parameters, return the active solution */
- if (lua_gettop(L) == 0)
- {
- script_internal_get_active_object(L, SolutionObject, IS_OPTIONAL);
- return 1;
- }
-
- name = luaL_checkstring(L, 1);
-
- /* check to see if a solution with this name already exists */
- lua_getglobal(L, SOLUTIONS_KEY);
- lua_getfield(L, -1, name);
- if (lua_isnil(L, -1))
- {
- /* solution does not exists, create it */
- lua_newtable(L);
-
- /* set the name */
- lua_pushstring(L, name);
- lua_setfield(L, -2, SolutionFieldInfo[SolutionName].name);
-
- /* set the base directory */
- lua_pushstring(L, script_internal_script_dir(L));
- lua_setfield(L, -2, SolutionFieldInfo[SolutionBaseDir].name);
-
- /* create an empty list of projects */
- lua_newtable(L);
- lua_setfield(L, -2, PROJECTS_KEY);
-
- /* configure the initial configuration block list */
- lua_newtable(L);
- lua_setfield(L, -2, BLOCKS_KEY);
- script_internal_create_block(L);
-
- /* use the list of fields to populate the object properties and accessor functions */
- script_internal_populate_object(L, SolutionFieldInfo);
-
- /* add it to the master list of solutions, keyed by name */
- lua_pushvalue(L, -1);
- lua_setfield(L, -4, name);
-
- /* also add with integer key */
- lua_pushvalue(L, -1);
- lua_rawseti(L, -4, luaL_getn(L, -4) + 1);
- }
-
- /* activate and return the solution object */
- script_internal_set_active_object(L, SolutionObject);
- return 1;
-}