From a11dd30b417e1f48da573748fa4ab5fe09f0b212 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Thu, 29 Jan 2015 19:07:10 -0800
Subject: * arith.c (make_ubignum): New static function. (sign_extend): New
 function.

* eval.c (eval_init): Register sign-extend intrinsic.

* lib.h (sign_extend): Declared.

* txr.1: Documented sign-extend.

* tl.vim, txr.vim: Updated.
---
 lib.h | 1 +
 1 file changed, 1 insertion(+)

(limited to 'lib.h')

diff --git a/lib.h b/lib.h
index cd753e52..511f6838 100644
--- a/lib.h
+++ b/lib.h
@@ -600,6 +600,7 @@ val logxor(val, val);
 val logtest(val, val);
 val lognot(val, val);
 val logtrunc(val a, val bits);
+val sign_extend(val num, val nbits);
 val ash(val a, val bits);
 val bit(val a, val bit);
 val maskv(val bits);
-- 
cgit v1.2.3