From 383c9f7813960d48597c76da0fb268be02683ef8 Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Wed, 21 Jan 2015 17:43:51 -0800
Subject: [PATCH] Add bc language to compiler_vm

---
 modules/compiler_vm/languages/bc.pm | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100755 modules/compiler_vm/languages/bc.pm

diff --git a/modules/compiler_vm/languages/bc.pm b/modules/compiler_vm/languages/bc.pm
new file mode 100755
index 00000000..b09751cb
--- /dev/null
+++ b/modules/compiler_vm/languages/bc.pm
@@ -0,0 +1,23 @@
+#!/usr/bin/env perl
+
+use warnings;
+use strict;
+
+package bc;
+use parent '_default';
+
+sub initialize {
+  my ($self, %conf) = @_;
+
+  $self->{sourcefile}      = 'prog.bc';
+  $self->{execfile}        = 'prog.bc';
+  $self->{default_options} = '';
+  $self->{cmdline}         = 'bc -q $options $sourcefile';
+}
+
+sub preprocess_code {
+  my $self = shift;
+  $self->{code} .= "\nquit\n";
+}
+
+1;