home *** CD-ROM | disk | FTP | other *** search
/ The CDPD Public Domain Collection for CDTV 3 / CDPDIII.bin / pd / programming / gnusmalltalk / smtk_diff < prev    next >
Text File  |  1992-06-10  |  11KB  |  404 lines

  1. *** mstcint.c    Wed Jun 03 22:20:06 1992
  2. --- smalltalk-1.2/mstcint.c    Sun Mar 01 23:19:37 1992
  3. ***************
  4. *** 302,308 ****
  5.     extern void window_create();
  6.     extern int system();
  7.     extern char *getenv();
  8. !   extern int read(), write(), open(), close(), ioctl(), lseek()/*, tell()*/;
  9.   
  10.     defineCFunc("system", system);
  11.     defineCFunc("getenv", getenv);
  12. --- 302,308 ----
  13.     extern void window_create();
  14.     extern int system();
  15.     extern char *getenv();
  16. !   extern int read(), write(), open(), close(), ioctl(), lseek(), tell();
  17.   
  18.     defineCFunc("system", system);
  19.     defineCFunc("getenv", getenv);
  20. ***************
  21. *** 315,321 ****
  22.     /* defineCFunc("ioctl", myioctl); */
  23.     defineCFunc("ioctl", ioctl);
  24.     defineCFunc("lseek", lseek);
  25. ! /*  defineCFunc("tell", tell);*/
  26.   
  27.     /* just to round out the set */
  28.     defineCFunc("readChar", readChar);
  29. --- 315,321 ----
  30.     /* defineCFunc("ioctl", myioctl); */
  31.     defineCFunc("ioctl", ioctl);
  32.     defineCFunc("lseek", lseek);
  33. !   defineCFunc("tell", tell);
  34.   
  35.     /* just to round out the set */
  36.     defineCFunc("readChar", readChar);
  37. *** mstoop.c    Wed Jun 10 17:57:41 1992
  38. --- smalltalk-1.2/mstoop.c    Sun Mar 01 23:19:39 1992
  39. ***************
  40. *** 105,116 ****
  41.   /* you can increase this value if you need more space, and it won't hurt
  42.    * performance *if* your machine has enough physical memory (otherwise, you
  43.    * thrash the pager) */
  44. - #ifdef AMIGA
  45. - #define INIT_MEM_SPACE_SIZE        /*(512 * K) */ (1500 * K)
  46. - #else
  47.   #define INIT_MEM_SPACE_SIZE        /*(512 * K) */ (2 * K * K)
  48.   #else
  49. - #endif
  50.   #define INIT_MEM_SPACE_SIZE        (1152 * K) 
  51.   #endif
  52.   
  53. --- 105,112 ----
  54. *** mstpaths.h-dist    Wed Jun 03 22:01:12 1992
  55. --- smalltalk-1.2/mstpaths.h-dist    Sun Feb 16 19:31:40 1992
  56. ***************
  57. *** 57,65 ****
  58.   #define __MSTPATHS__
  59.   
  60.   /* This defines where the kernel smalltalk (.st) files can be found */
  61. ! #define KERNEL_PATH "work2:projects/smalltalk-1.2"
  62.   
  63.   /* This defines where to search for the saved binary image */
  64. ! #define IMAGE_PATH "work2:projects/smalltalk-1.2"
  65.   
  66.   #endif /* __MSTPATHS__ */
  67. --- 57,65 ----
  68.   #define __MSTPATHS__
  69.   
  70.   /* This defines where the kernel smalltalk (.st) files can be found */
  71. ! #define KERNEL_PATH "/usr/gnu/smalltalk"
  72.   
  73.   /* This defines where to search for the saved binary image */
  74. ! #define IMAGE_PATH "/usr/gnu/smalltalk"
  75.   
  76.   #endif /* __MSTPATHS__ */
  77. *** ymakefile    Sat Jun 06 16:37:47 1992
  78. --- smalltalk-1.2/ymakefile    Sun Mar 01 23:19:43 1992
  79. ***************
  80. *** 1,21 ****
  81. ! ;#include "mstconfig.h"
  82. ! ;#include "mstpaths.h"
  83.   
  84.   
  85. ! ;#ifndef DEFAULT_LIBRARIES
  86.   #define DEFAULT_LIBRARIES -lm
  87. ! ;#endif
  88.   
  89.   #ifndef EXTRA_CC_FLAGS
  90.   #define EXTRA_CC_FLAGS
  91.   #endif
  92.   
  93.   
  94.   #ifndef OTHER_FILES
  95.   #define OTHER_FILES
  96.   #endif
  97.   
  98.   #ifndef OBJECTS_SYSTEM
  99.   #define OBJECTS_SYSTEM
  100.   #endif
  101. --- 1,76 ----
  102. ! /*******************************************************************
  103. !  * 
  104. !  * Copyright (C) 1990, 1991, 1992 Free Software Foundation, Inc.
  105. !  * Written by Steve Byrne.
  106. !  * 
  107. !  * This file is part of GNU Smalltalk.
  108. !  *  
  109. !  * GNU Smalltalk is free software; you can redistribute it and/or modify it
  110. !  * under the terms of the GNU General Public License as published by the Free
  111. !  * Software Foundation; either version 1, or (at your option) any later 
  112. !  * version.
  113. !  * 
  114. !  * GNU Smalltalk is distributed in the hope that it will be useful, but WITHOUT
  115. !  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  116. !  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  117. !  * more details.
  118. !  * 
  119. !  * You should have received a copy of the GNU General Public License along with
  120. !  * GNU Smalltalk; see the file COPYING.  If not, write to the Free Software
  121. !  * Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  122. !  *
  123. !  ********************************************************************/
  124.   
  125. + #include "mstconfig.h"
  126. + #include "mstpaths.h"
  127.   
  128. ! #ifndef DEFAULT_LIBRARIES
  129.   #define DEFAULT_LIBRARIES -lm
  130. ! #endif
  131.   
  132. + /* The configuration files can define extra flags for the C compiler
  133. +  * using this definition
  134. +  */
  135.   #ifndef EXTRA_CC_FLAGS
  136.   #define EXTRA_CC_FLAGS
  137.   #endif
  138.   
  139.   
  140. + #ifdef USE_READLINE
  141. + READLINEDIR = READLINEDIRDEF
  142. + READLINEDEF = -DUSE_READLINE -I$(READLINEDIR)
  143. + READLINELIB = -L$(READLINEDIR)./readline -lreadline -ltermcap
  144. + #endif
  145. + #ifdef USE_DLD
  146. + DLDDIR = DLDDIRDEF
  147. + DLDDEF = -DDLD -I$(DLDDIR)
  148. + DLDLIB = -L$(DLDDIR) -ldld
  149. + #if defined(SUNOS40)
  150. + /* BINDING = -Bstatic */
  151. + #endif
  152. + #endif
  153. + #ifndef SYSTEM_MALLOC
  154. + #ifdef HAVE_ALLOCA
  155. + mallocobj = malloc.o
  156. + #else
  157. + mallocobj = alloca.o malloc.o
  158. + #endif
  159. + #endif
  160. + /* just to be sure the sh is used */
  161. + SHELL=/bin/sh
  162. + /* Enable recompilation of certain other files depending on system type.  */
  163.   #ifndef OTHER_FILES
  164.   #define OTHER_FILES
  165.   #endif
  166.   
  167. ! /* Enable inclusion of object files in temacs depending on system type.  */
  168.   #ifndef OBJECTS_SYSTEM
  169.   #define OBJECTS_SYSTEM
  170.   #endif
  171. ***************
  172. *** 25,53 ****
  173.   #endif
  174.   
  175.   
  176. ! #define HAVE_ALLOCA
  177.   
  178.   MAINTAINER = 'sbb@Eng.sun.com'
  179.   
  180. ! CFLAGS_NORMAL   = -g $(EXTRA_CC_FLAGS)
  181. ! CFLAGS_PROFILE  = -g -pg -DUSE_MONCONTROL $(EXTRA_CC_FLAGS)
  182. ! CFLAGS_OPTIMIZE = -O2 -DOPTIMIZE $(EXTRA_CC_FLAGS)
  183. ! ;#undef PROFILE
  184. ! ;#undef NORMAL
  185. ! ;#define OPTIMIZE
  186. ! ;
  187. ! ;#ifdef PROFILE
  188. ! ;CFLAGS = $(CFLAGS_PROFILE) $(EXTRA_PACKAGES)
  189. ! ;#else
  190. ! ;#ifdef OPTIMIZE
  191. ! ;CFLAGS = $(CFLAGS_OPTIMIZE) $(EXTRA_PACKAGES)
  192. ! ;#else
  193. ! ;CFLAGS = $(CFLAGS_NORMAL) $(EXTRA_PACKAGES)
  194. ! ;#endif
  195. ! ;#endif
  196. ! CFLAGS = -mc68020 -m68881
  197.   
  198.   OBJS =  mstmain.o   mstlib.o    mst.tab.o   mstlex.o    mststr.o \
  199.       mstid.o     msttree.o   mstbyte.o   mstinterp.o mstcomp.o \
  200.       mstsym.o    mstdict.o   mstoop.o    mstsave.o   mstcint.o \
  201. --- 80,165 ----
  202.   #endif
  203.   
  204.   
  205. ! /* Some machines have alloca built-in.
  206. !  * They should define HAVE_ALLOCA, or may just let alloca.s
  207. !  * be used but generate no code.
  208. !  * Some have it written in assembler in alloca.s.
  209. !  * Some use the C version in alloca.c (these define C_ALLOCA in mstconfig.h).
  210. !  */
  211. ! #ifdef C_ALLOCA
  212. ! ALLOCA = alloca.o alloc.o
  213. ! alloca.o: alloca.c
  214. ! #else
  215. ! #ifdef NEED_ALLOCA
  216. ! ALLOCA = alloca.o
  217. ! alloca.o : alloca.s mstconfig.h
  218. ! /* $(CPP) is cc -E, which may get confused by filenames
  219. !  * that do not end in .c.  So copy file to a safe name.  */
  220. !     cp alloca.s allocatem.c
  221. ! /* remove any ^L, blank lines, and preprocessor comments,
  222. !  * since some assemblers barf on them */
  223. !     $(CPP) allocatem.c | \
  224. !     sed -e 's/ //' -e 's/^#.*//' | \
  225. !     sed -n -e '/^..*$$/p' > allocatem.s
  226. !     -rm -f alloca.o
  227. ! /* Xenix, in particular, needs to run assembler via cc.  */
  228. !     $(CC) -c allocatem.s
  229. !     mv allocatem.o alloca.o
  230. !     rm allocatem.s allocatem.c
  231. ! #endif /* NEED_ALLOCA */
  232. ! #endif /* not C_ALLOCA */
  233. ! /* System-specific programs to be made.
  234. !    OTHER_FILES, OBJECTS_SYSTEM and OBJECTS_MACHINE
  235. !    select which of these should be compiled.  */
  236.   
  237. + /*************
  238. +  *
  239. +  * These variables you may wish to change
  240. +  *
  241. +  *************/
  242. + /* Mail path to GNU Smalltalk maintainer (Steve Byrne) */
  243.   MAINTAINER = 'sbb@Eng.sun.com'
  244.   
  245. ! /* Compilation flags definitions */
  246. ! CFLAGS_NORMAL   = -g EXTRA_CC_FLAGS 
  247. ! CFLAGS_PROFILE  = -g -pg -DUSE_MONCONTROL EXTRA_CC_FLAGS 
  248. ! CFLAGS_OPTIMIZE = -O -DOPTIMIZE EXTRA_CC_FLAGS 
  249. ! #ifdef SUNOS40
  250. ! /* +++ Sun hacks */
  251. ! CFLAGS_OPTIMIZE = -O3 -DOPTIMIZE EXTRA_CC_FLAGS 
  252. ! CFLAGS_TEST = -O3 -DOPTIMIZE -pg EXTRA_CC_FLAGS
  253. ! #endif
  254. ! EXTRA_PACKAGES = $(READLINEDEF) $(DLDDEF)
  255. ! #ifdef PROFILE
  256. ! /* Actual compilation flags and compiler definition */
  257. ! CFLAGS = $(CFLAGS_PROFILE) $(EXTRA_PACKAGES)
  258. ! #else
  259. ! #ifdef OPTIMIZE
  260. ! /* Actual compilation flags and compiler definition */
  261. ! CFLAGS = $(CFLAGS_OPTIMIZE) $(EXTRA_PACKAGES)
  262. ! #else
  263. ! /* Actual compilation flags and compiler definition */
  264. ! CFLAGS = $(CFLAGS_NORMAL) $(EXTRA_PACKAGES)
  265. ! #endif
  266. ! #endif
  267.   
  268. + /********************************************************************
  269. +  * The following definitions are not something that the casual user would
  270. +  * want to change.
  271. +  ********************************************************************/
  272.   OBJS =  mstmain.o   mstlib.o    mst.tab.o   mstlex.o    mststr.o \
  273.       mstid.o     msttree.o   mstbyte.o   mstinterp.o mstcomp.o \
  274.       mstsym.o    mstdict.o   mstoop.o    mstsave.o   mstcint.o \
  275. ***************
  276. *** 59,71 ****
  277.       mstsysdep.c mstcallin.c 
  278.   
  279.   
  280. ! LIBS =  $(DEFAULT_LIBRARIES) $(USER_LIBS) $(READLINELIB) $(DLDLIB)
  281.   
  282.   
  283.   all: mst
  284.   
  285.   mst: $(OBJS)
  286. !     $(CC) $(BINDING) -o mst $(CFLAGS) $(OBJS) $(LIBS) -lm
  287.   
  288.   mst.tab.h mst.tab.c: mst.y
  289.       bison -dv mst.y
  290. --- 171,183 ----
  291.       mstsysdep.c mstcallin.c 
  292.   
  293.   
  294. ! LIBS =  DEFAULT_LIBRARIES $(USER_LIBS) $(READLINELIB) $(DLDLIB)
  295.   
  296.   
  297.   all: mst
  298.   
  299.   mst: $(OBJS)
  300. !     $(CC) $(BINDING) -o mst $(CFLAGS) $(OBJS) $(LIBS)
  301.   
  302.   mst.tab.h mst.tab.c: mst.y
  303.       bison -dv mst.y
  304. ***************
  305. *** 74,81 ****
  306. --- 186,201 ----
  307.   
  308.   mstlex.o: mst.tab.h
  309.   
  310. + /* These depend on the oop table size */
  311.   mstsave.o mstoop.o mstlib.o mstsym.o: mstoop.h
  312.   
  313. + #if defined(SUNOS40) && defined(OPTIMIZE)
  314. + mstinterp.o: mstinterp.c
  315. +     $(CC) -O2 -DOPTIMIZE $(EXTRA_PACKAGES) -c mstinterp.c
  316. + #endif
  317. + /* !!! Clean these up in the future */ 
  318.   mstlib.o: mst.h
  319.   mstlib.o: mstconfig.h
  320.   mstlib.o: mst.tab.h
  321. ***************
  322. *** 197,202 ****
  323. --- 317,341 ----
  324.   mstcallin.o: mstoop.h
  325.   
  326.   
  327. + /*
  328. +  * Install the files into the proper place
  329. +  */
  330. + install:
  331. +     if test ! -d KERNEL_PATH ; then      \
  332. +         mkdir -p KERNEL_PATH ;           \
  333. +     fi
  334. +     cp *.st KERNEL_PATH
  335. +     (cd KERNEL_PATH; chmod +r *.st)
  336. +     if test ! -d IMAGE_PATH ; then      \
  337. +         mkdir -p IMAGE_PATH ;           \
  338. +     fi
  339. +     (x=`pwd`; cd IMAGE_PATH; $$x/mst -Vi)
  340. + /***
  341. +  *** Experimental Linting of the code
  342. +  ***/
  343.   lint: $(SRCS)
  344.       lint $(SRCS)
  345.   
  346. ***************
  347. *** 207,212 ****
  348. --- 346,363 ----
  349.   profile:
  350.       make CFLAGS='$(CFLAGS) -pg -Dprofiling'
  351.   
  352. + senddiffs: diffs
  353. +     kermit -e 1000 -s mst.diffs
  354. + mail-diffs:
  355. +     @echo "Please enter a brief note describing the contents of"
  356. +     @echo "the diffs file that you've created.  End with Ctrl-D."
  357. +     @cat > mst.diffs.note
  358. +     @echo "-----------------------------------" >> mst.diffs.note
  359. +     @### If there''s a more portable/better way to do this, please
  360. +     @### don''t hesitate to fix this and send the new version back -- SBB
  361. +     @cat mst.diffs.note mst.diffs | mail $(MAINTAINER)
  362.   diffs:
  363.       mk_mst_diffs
  364.   
  365. ***************
  366. *** 218,224 ****
  367.       rm -rf ./orig
  368.       mkdir ./orig
  369.       tar cbf 20 - `cat mstfiles` | (cd ./orig; tar xbBf 20 -)
  370.   
  371.   
  372.   
  373. --- 369,374 ----
  374.