elfnew.c - scc - simple c99 compiler
 (HTM) git clone git://git.simple-cc.org/scc
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) Submodules
 (DIR) README
 (DIR) LICENSE
       ---
       elfnew.c (423B)
       ---
            1 #include <stdio.h>
            2 #include <stdlib.h>
            3 
            4 #include <scc/mach.h>
            5 #include <scc/elf.h>
            6 
            7 #include "../libmach.h"
            8 #include "fun.h"
            9 
           10 int
           11 elfnew(Obj *obj, int type)
           12 {
           13         struct elf *elf;
           14         struct arch *ap;
           15 
           16         if ((elf = calloc(1, sizeof(*elf))) == NULL)
           17                 return -1;
           18         for (ap = elfarchs; ap->name; ++ap) {
           19                 if (ap->type == type)
           20                         break;
           21         }
           22 
           23         elf->is32 = (ap->name) ? ap->is32 : -1;
           24         obj->data = elf;
           25         obj->index = "/";
           26         return 0;
           27 }