# override.tcl --
#
#  Checks that files that contain procedures with the same name as the
#  ones used by the compiler package do not cause the ones in the compiler
#  package to disappear.
#  They would if the temporary command created in CompileOneProcBody had
#  the same name as the procedure whose body we are compiling.
#
# Copyright (c) 1998-2000 Ajuba Solutions
# Copyright (c) 2000, 2017 ActiveState Software Inc.
#
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
# 
# RCS: @(#) $Id: override.tbc,v 1.2 2000/05/30 22:19:08 wart Exp $
# TclPro::Compiler::Include

if {[catch {package require tbcload 1.0} err] == 1} {
    error "The TclPro ByteCode Loader is not available"
}
tbcload::bceval {
TclPro ByteCode 1 0 1.0 8.0
3 0 29 10 0 0 16 0 4 3 3 -1 -1
29
w0E<!(H&s!/HW<!1Ki<!5/Ypv.|yTv2o8X!z
3
7/0v
3
=fW!
10
x
9
njkSAt=sp@1v
x
4
uKhgC
x
7
,CHr@ndu,
x
26
6dV<+)<..D!:p;@oPYKAAo5cE<PpeD=@!
x
4
,CHr@
x
12
,CHr@SqJc3IT_5B
x
5
4o.6BA!
p
1 0 13 2 0 0 4 0 3 1 1 -1 -1
13
,|&v!-`&v!1`8X!z
1
z
1
-!
2
x
6
82_`FWnw
x
3
F<Fw
0
0
1 1
3
i@w,
0 0 257
x
4
b4Z)<
x
15
rpwhC;Z2b3<?<+EfqT+
0
0
}
