From 68188b14b82a9872922d9f41490015d87270c7f9 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Mon, 23 Sep 1996 12:02:11 +0200
Subject: [PATCH] warning removed
Rev: src/las.c:1.2
Rev: src/lex.c:1.2
---
src/las.c | 8 ++++----
src/lex.c | 2 +-
2 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/src/las.c b/src/las.c
index 03125a85f0..895c3aca8a 100644
--- a/src/las.c
+++ b/src/las.c
@@ -166,7 +166,7 @@ node *mknode(short token,node *a,node *b)
case F_APPLY:
if(a && a->token == F_CONSTANT &&
a->u.sval.type == T_FUNCTION &&
- a->u.sval.subtype == -1)
+ (short)a->u.sval.subtype == -1)
{
res->node_info |= a->u.sval.u.efun->flags;
}else{
@@ -414,7 +414,7 @@ node *mksvaluenode(struct svalue *s)
case T_FUNCTION:
{
- if(s->subtype != -1)
+ if((short)s->subtype != -1)
{
if(s->u.object == &fake_object)
return mkidentifiernode(s->subtype);
@@ -1167,7 +1167,7 @@ static void optimize(node *n)
case F_APPLY:
if(CAR(n)->token == F_CONSTANT &&
CAR(n)->u.sval.type == T_FUNCTION &&
- CAR(n)->u.sval.subtype == -1 && /* driver fun? */
+ (short)CAR(n)->u.sval.subtype == -1 && /* driver fun? */
CAR(n)->u.sval.u.efun->optimize)
{
if(tmp1=CAR(n)->u.sval.u.efun->optimize(n))
@@ -1372,7 +1372,7 @@ static void optimize(node *n)
CAR(opnode) &&
CAR(opnode)->token == F_CONSTANT &&
CAR(opnode)->u.sval.type == T_FUNCTION &&
- CAR(opnode)->u.sval.subtype == -1)
+ (short)CAR(opnode)->u.sval.subtype == -1)
{
if(CAR(opnode)->u.sval.u.efun->function == f_gt)
oper=F_GT;
diff --git a/src/lex.c b/src/lex.c
index 901a03d351..c1494c0235 100644
--- a/src/lex.c
+++ b/src/lex.c
@@ -343,7 +343,7 @@ char *get_f_name(int n)
if(fp && fp->context.prog &&
(int)fp->context.prog->num_constants > (int)(n-F_MAX_OPCODE) &&
fp->context.prog->constants[n-F_MAX_OPCODE].type==T_FUNCTION &&
- fp->context.prog->constants[n-F_MAX_OPCODE].subtype == -1 &&
+ (short)fp->context.prog->constants[n-F_MAX_OPCODE].subtype == -1 &&
fp->context.prog->constants[n-F_MAX_OPCODE].u.efun)
{
return fp->context.prog->constants[n-F_MAX_OPCODE].u.efun->name->str;
--
GitLab