/* 
 * Copyright 2010 Stefan Lankes, Chair for Operating Systems,
 *                               RWTH Aachen University
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
 * This file is part of MetalSVM. 
 */

#include "config.h"
#include <metalsvm/syscall.h>
#include <_ansi.h>
#include <_syslist.h>
#include <errno.h>
#undef errno
extern int errno;
#include "warning.h"

typedef void (*ctp)();

void
__do_global_ctors ()
{
	extern int __CTOR_LIST__;
	int *c = &__CTOR_LIST__;

	c++;
	while (*c) {
		ctp d = (ctp)*c;
		(d)();
		c++;
	}
}

void
__do_global_dtors ()
{
	extern int __DTOR_LIST__;
	int *c = &__DTOR_LIST__;
	int *cp = c;
	
	c++;
	while (*c)
		c++;
  
	c--;
	while (c > cp) {
		ctp d = (ctp)*c;
		(*d)();
		c--;
	}
}