Path: utzoo!attcan!uunet!cs.utexas.edu!swrinde!zaphod.mps.ohio-state.edu!rpi!uupsi!sunic!liuida!news
From: news@majestix.ida.liu.se (News Subsystem)
Newsgroups: alt.sources
Subject: TILE Forth Release 2.0, Package 3 of 6
Keywords: echo shar: Will not over-write existing file \"PORTING\"
Message-ID: <1934@majestix.ida.liu.se>
Date: 29 Jun 90 15:07:53 GMT
Organization: CIS Dept, Univ of Linkoping, Sweden
Lines: 11
XEmail: mip@ida.liu.se
    echo shar: \"PORTING\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"lib/debugger.f83\"
X: [advice] ( advice -- )
X: [colon] ( advice -- )
X: [trace] ( advice -- )
X: [break] ( advice -- )
X: tail-recurse ( -- )
X: ?advice ( entry -- flag)
X: advice ( action -- )
X: colon ( -- )
X: trace ( -- )
X: break ( -- )
X: .profile ( -- )
X: : ( -- )
    echo shar: \"lib/debugger.f83\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"lib/internals.f83\"
X: .entry ( entry -- )
X: .context ( -- )
X: .current ( -- )
X: .entries ( type -- )
    echo shar: \"lib/internals.f83\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"lib/queues.f83\"
X: succ ( queue -- succ)
X: pred ( queue -- pred)
X: ?empty-queue ( queue -- bool)
X: enqueue ( item queue -- )
X: dequeue ( item -- )
X: size-queue ( queue -- int)
X: map-queue ( queue block[item -- ] -- )
X: ?map-queue ( queue block[item -- bool] -- )
X: ?member-queue ( element queue -- bool)
X: .queue ( queue -- )
    echo shar: \"lib/queues.f83\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"lib/structures.f83\"
X: as ( -- struct)
X: this ( -- ptr)
X: initiate ( ptr struct -- )
X: make ( struct -- ptr)
X: new ( -- ptr)
X: sizeof ( -- size)
X: assign ( a b -- )
X: struct.type ( -- struct offset0)
X: bytes ( offset1 n -- offset2)
X: align ( offset1 -- offset2)
X: field ( bytes -- )
X: struct ( -- )
X: struct.init ( struct offset3 -- )
X: struct.does ( -- )
X: struct.end ( [] or [struct offset3] -- )  
    echo shar: \"lib/structures.f83\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"src/compiler.v\"
    echo shar: \"src/compiler.v\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"src/error.c\"
    echo shar: \"src/error.c\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"src/forth.c\"
    echo shar: \"src/forth.c\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"src/locals.v\"
    echo shar: \"src/locals.v\" unpacked with wrong size!
  echo shar: Will not over-write existing file \"src/multi-tasking.v\"
    echo shar: \"src/multi-tasking.v\" unpacked with wrong size!
    if test ! -f ark${I}isdone ; then
	MISSING="${MISSING} ${I}"
    fi
    echo You have unpacked all 6 archives.
    rm -f ark[1-9]isdone
    echo You still need to unpack the following archives:
    echo "        " ${MISSING}

--
Mikael R.K. Patel
Researcher and Lecturer
Computer Aided Design Laboratory (CADLAB)
Department of Computer and Information Science
Linkoping University, S-581 83  LINKOPING, SWEDEN

Phone: +46 13281821
Telex: 8155076 LIUIDA S			Telefax: +46 13142231
Internet: mip@ida.liu.se		UUCP: {uunet,mcsun,...}!liuida!mip
Bitnet: MIP@SELIUIDA			SUNET: LIUIDA::MIP