#include <oxstd.h>
main()
{
    decl file, s, c;
    decl svar, address;

    file = fopen("data/data.in7");
    if (!isfile(file))
    {
        print("failed to open file\n");
        exit(1);
    }
    do
    {   c = fscan(file, " %z", &s);
        if (c > 0 && s[0] == '>')
        {
            sscan(&s, ">%s", &svar, "%*d", "%*d", "%*d",
                "%*d", "%*d", "%d", &address, " ");
            println("variable : ", svar, " address:", address);
            println("remainder: ", s);
        }
    } while (c > 0);

    fclose(file);
}
