X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=test.pl;fp=test.pl;h=1e45cf97a45d7270426cf7b3a85c2a4e6c02d2b0;hb=acf21e18bbace361594e4fbf64b8a76528ea9d02;hp=0000000000000000000000000000000000000000;hpb=2542aba7b673cfeeaf485d3b4f587704b47705ce;p=clump.git

diff --git a/test.pl b/test.pl
new file mode 100644
index 0000000..1e45cf9
--- /dev/null
+++ b/test.pl
@@ -0,0 +1,17 @@
+#!/usr/bin/perl
+use v5.14;
+use warnings;
+use lib '.';
+
+use asm;
+
+loadi 0, 5;
+store 0, 0, 0, 0;
+loadi 0, 7;
+store 1, 0, 0, 0;
+
+loada 0, 1, 0, alu_select_b;
+loadb 1, 0, 1, alu_xor;
+store 2, 3, 0, 0;
+
+write_verilog;