diff options
Diffstat (limited to 'usr/src/lib/efcode/engine/forth.c')
| -rw-r--r-- | usr/src/lib/efcode/engine/forth.c | 25 |
1 files changed, 12 insertions, 13 deletions
diff --git a/usr/src/lib/efcode/engine/forth.c b/usr/src/lib/efcode/engine/forth.c index b0b8005342..33bd2c37d1 100644 --- a/usr/src/lib/efcode/engine/forth.c +++ b/usr/src/lib/efcode/engine/forth.c @@ -2,9 +2,8 @@ * CDDL HEADER START * * The contents of this file are subject to the terms of the - * Common Development and Distribution License, Version 1.0 only - * (the "License"). You may not use this file except in compliance - * with the License. + * Common Development and Distribution License (the "License"). + * You may not use this file except in compliance with the License. * * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE * or http://www.opensolaris.org/os/licensing. @@ -20,8 +19,8 @@ * CDDL HEADER END */ /* - * Copyright (c) 2000 by Sun Microsystems, Inc. - * All rights reserved. + * Copyright 2007 Sun Microsystems, Inc. All rights reserved. + * Use is subject to license terms. */ #pragma ident "%Z%%M% %I% %E% SMI" @@ -444,23 +443,23 @@ less_equals(fcode_env_t *env) void between(fcode_env_t *env) { - s_lforth_t hi, lo; + u_lforth_t hi, lo; CHECK_DEPTH(env, 3, "between"); - hi = (s_lforth_t)POP(DS); - lo = (s_lforth_t)POP(DS); - TOS = (((s_lforth_t)TOS >= lo) && ((s_lforth_t)TOS <= hi) ? -1 : 0); + hi = (u_lforth_t)POP(DS); + lo = (u_lforth_t)POP(DS); + TOS = (((u_lforth_t)TOS >= lo) && ((u_lforth_t)TOS <= hi) ? -1 : 0); } void within(fcode_env_t *env) { - s_lforth_t lo, hi; + u_lforth_t lo, hi; CHECK_DEPTH(env, 3, "within"); - hi = (s_lforth_t)POP(DS); - lo = (s_lforth_t)POP(DS); - TOS = ((((s_lforth_t)TOS >= lo) && ((s_lforth_t)TOS < hi)) ? -1 : 0); + hi = (u_lforth_t)POP(DS); + lo = (u_lforth_t)POP(DS); + TOS = ((((u_lforth_t)TOS >= lo) && ((u_lforth_t)TOS < hi)) ? -1 : 0); } void |