blob: 43540f9b658e5cb4319fccf32c72130cf1285888 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
/******************************************************************************
* Copyright (c) 2009, 2011 IBM Corporation
* All rights reserved.
* This program and the accompanying materials
* are made available under the terms of the BSD License
* which accompanies this distribution, and is available at
* http://www.opensource.org/licenses/bsd-license.php
*
* Contributors:
* IBM Corporation - initial implementation
*****************************************************************************/
#include <string.h>
#include <libelf.h>
#include "../../slof/paflof.h"
/**
* Call Forth code to try to claim the memory region
*/
int
elf_forth_claim(void *addr, long size)
{
forth_push((long)addr);
forth_push(size);
forth_eval("elf-claim-segment");
return forth_pop();
}
|