Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: 50d0b893bb
Fetching contributors…

Cannot retrieve contributors at this time

file 65 lines (56 sloc) 1.873 kb
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 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65
# nmake /F makefile.mak

LUAJIT = luajit
LLVM_LUA = llvm-lua
LUA = lua

OSNAME = MSWin32
ARCHNAME = MSWin32-x86-multi-thread
INTSIZE = 4

harness: env
@prove --exec=$(LUA) *.t

sanity: env
@prove --exec=$(LUA) 0*.t

luajit: env
@prove --exec=$(LUAJIT) *.t

llvm-lua: env
@prove --exec=$(LLVM_LUA) *.t

env:
@set LUA_PATH=;;../src/?.lua
@set LUA_INIT=platform = { lua=[[$(LUA)]], osname=[[$(OSNAME)]], intsize=$(INTSIZE) }

upload_pl = \
use strict; \
use warnings; \
use LWP::UserAgent; \
my $$ua = LWP::UserAgent->new(); \
$$ua->env_proxy(); \
my $$server = q{http://smolder.parrot.org}; \
my $$project_id = 7; \
my $$url = $$server . q{/app/projects/process_add_report/} . $$project_id; \
my $$response = $$ua->post( \
    $$url, \
    Content_Type => q{form-data}, \
    Content => [ \
        architecture => q{$(ARCHNAME)}, \
        platform => q{$(OSNAME)}, \
        tags => q{$(OSNAME), $(ARCHNAME), $(LUA)}, \
        comments => q{$(LUA)}, \
        username => q{parrot-autobot}, \
        password => q{qa_rocks}, \
        project_id => $$project_id, \
        report_file => [q{test_lua51.tar.gz}], \
        ] \
); \
if ($$response->code == 302) { \
    my ($$report_id) = $$response->content =~ /Reported .(\d+) added/i; \
    my $$report_url = $$server . q{/app/public_projects/report_details/} . $$report_id; \
    my $$project_url = $$server . q{/app/public_projects/smoke_reports/} . $$project_id; \
    print qq{Test report successfully sent to Smolder at\n$$report_url} \
      . qq{\nYou can see other recent reports at\n$$project_url .\n\n}; \
} \
else { \
die qq{Could not upload report to Smolder at $$server} \
. qq{\nHTTP CODE: } . $$response->code . q{ (} \
. $$response->message . qq{)\n}; \
}

smolder: env
-@prove --archive test_lua51.tar.gz --exec=$(LUA) *.t
perl -e "$(upload_pl)"
Something went wrong with that request. Please try again.