forked from dirkmueller/bc
Compare commits
10 Commits
Author | SHA256 | Date | |
---|---|---|---|
|
d490004566 | ||
|
6f64011144 | ||
|
7ac7ba4e70 | ||
|
472d08b1f4 | ||
|
8cf0c3bfa8 | ||
|
95fd9fdb7d | ||
|
7b27fb2592 | ||
|
09d58be310 | ||
|
c31a25c7ba | ||
|
dbaa85ab83 |
@ -1,10 +0,0 @@
|
||||
--- bc-1.06/lib/number.c
|
||||
+++ bc-1.06/lib/number.c
|
||||
@@ -35,6 +35,7 @@
|
||||
#include <assert.h>
|
||||
#include <stdlib.h>
|
||||
#include <ctype.h>/* Prototypes needed for external utility routines. */
|
||||
+#include <string.h>
|
||||
|
||||
#define bc_rt_warn rt_warn
|
||||
#define bc_rt_error rt_error
|
@ -1,11 +0,0 @@
|
||||
--- ./configure.in 2000-07-08 01:34:09.000000000 +0200
|
||||
+++ ./configure.in 2004-08-19 12:36:16.000000000 +0200
|
||||
@@ -68,7 +68,7 @@
|
||||
])
|
||||
|
||||
if test "$LEX" = "flex" ; then
|
||||
- LEX="flex -I8"
|
||||
+ LEX="flex -I -8"
|
||||
else
|
||||
if test "$bcrl" = "y" ; then
|
||||
AC_MSG_WARN(readline works only with flex.)
|
@ -1,20 +0,0 @@
|
||||
--- bc/bc.y
|
||||
+++ bc/bc.y
|
||||
@@ -203,7 +203,7 @@ statement : Warranty
|
||||
{
|
||||
if ($4 & 2)
|
||||
warn ("Comparison in first for expression");
|
||||
- if ($4 >= 0)
|
||||
+ if (!($4 & 16))
|
||||
generate ("p");
|
||||
$4 = next_label++;
|
||||
sprintf (genstr, "N%1d:", $4);
|
||||
@@ -211,7 +211,7 @@ statement : Warranty
|
||||
}
|
||||
opt_expression ';'
|
||||
{
|
||||
- if ($7 < 0) generate ("1");
|
||||
+ if ($7 & 16) generate ("1");
|
||||
$7 = next_label++;
|
||||
sprintf (genstr, "B%1d:J%1d:", $7, break_label);
|
||||
generate (genstr);
|
@ -1,13 +0,0 @@
|
||||
--- bc-1.06/dc/numeric.c
|
||||
+++ bc-1.06/dc/numeric.c
|
||||
@@ -254,8 +254,8 @@
|
||||
{
|
||||
dc_data result;
|
||||
|
||||
- bc_init_num((bc_num *)&result.v.number);
|
||||
- bc_int2num((bc_num *)&result.v.number, value);
|
||||
+ bc_init_num(&result.v.number);
|
||||
+ bc_int2num(&result.v.number, value);
|
||||
result.dc_type = DC_NUMBER;
|
||||
return result;
|
||||
}
|
55
bc-1.06.dif
55
bc-1.06.dif
@ -1,55 +0,0 @@
|
||||
--- bc/load.c
|
||||
+++ bc/load.c
|
||||
@@ -156,7 +156,7 @@
|
||||
long label_no;
|
||||
long vaf_name; /* variable, array or function number. */
|
||||
long func;
|
||||
- program_counter save_adr;
|
||||
+ program_counter save_adr = { 0, 0 };;
|
||||
|
||||
/* Initialize. */
|
||||
str = code;
|
||||
--- bc/scan.l
|
||||
+++ bc/scan.l
|
||||
@@ -143,7 +143,7 @@
|
||||
|
||||
/* Definitions for readline access. */
|
||||
extern FILE *rl_instream;
|
||||
-_PROTOTYPE(char *readline, (char *));
|
||||
+/* _PROTOTYPE(char *readline, (char *)); */
|
||||
|
||||
/* rl_input puts upto MAX characters into BUF with the number put in
|
||||
BUF placed in *RESULT. If the yy input file is the same as
|
||||
--- bc/util.c
|
||||
+++ bc/util.c
|
||||
@@ -423,7 +423,7 @@
|
||||
case 0: /* no height increase. */
|
||||
return (FALSE);
|
||||
case -1: /* height increase. */
|
||||
- return (FALSE);
|
||||
+ return (TRUE);
|
||||
case -2: /* we need to do a rebalancing act. */
|
||||
A = *root;
|
||||
B = (*root)->left;
|
||||
@@ -476,7 +476,7 @@
|
||||
case 0: /* no height increase. */
|
||||
return (FALSE);
|
||||
case 1: /* height increase. */
|
||||
- return (FALSE);
|
||||
+ return (TRUE);
|
||||
case 2: /* we need to do a rebalancing act. */
|
||||
A = *root;
|
||||
B = (*root)->right;
|
||||
--- doc/bc.info
|
||||
+++ doc/bc.info
|
||||
@@ -1,5 +1,10 @@
|
||||
This is bc.info, produced by makeinfo version 4.0 from bc.texi.
|
||||
|
||||
+START-INFO-DIR-ENTRY
|
||||
+* bc: (bc). An arbritrary precision calculator language
|
||||
+END-INFO-DIR-ENTRY
|
||||
+
|
||||
+
|
||||
|
||||
File: bc.info, Node: Top, Next: Introduction, Prev: (dir), Up: (dir)
|
||||
|
@ -1,3 +0,0 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:250595f87ff5aa8ce91eb09f14efb19f9b9087999a8cf5751ceff8f4b4b63f21
|
||||
size 230980
|
@ -1,12 +0,0 @@
|
||||
--- bc/main.c
|
||||
+++ bc/main.c
|
||||
@@ -93,6 +93,9 @@ parse_args (argc, argv)
|
||||
|
||||
switch (optch)
|
||||
{
|
||||
+ case 0: /* long option */
|
||||
+ break;
|
||||
+
|
||||
case 'c': /* compile only */
|
||||
compile_only = TRUE;
|
||||
break;
|
Loading…
x
Reference in New Issue
Block a user