home *** CD-ROM | disk | FTP | other *** search
/ The CDPD Public Domain Collection for CDTV 3 / CDPDIII.bin / pd / programming / gnusmalltalk / smtk_diff < prev    next >
Encoding:
Text File  |  1992-06-10  |  10.3 KB  |  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. ! 
  99.   #ifndef OBJECTS_SYSTEM
  100.   #define OBJECTS_SYSTEM
  101.   #endif
  102. --- 1,76 ----
  103. ! /*******************************************************************
  104. !  * 
  105. !  * Copyright (C) 1990, 1991, 1992 Free Software Foundation, Inc.
  106. !  * Written by Steve Byrne.
  107. !  * 
  108. !  * This file is part of GNU Smalltalk.
  109. !  *  
  110. !  * GNU Smalltalk is free software; you can redistribute it and/or modify it
  111. !  * under the terms of the GNU General Public License as published by the Free
  112. !  * Software Foundation; either version 1, or (at your option) any later 
  113. !  * version.
  114. !  * 
  115. !  * GNU Smalltalk is distributed in the hope that it will be useful, but WITHOUT
  116. !  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  117. !  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  118. !  * more details.
  119. !  * 
  120. !  * You should have received a copy of the GNU General Public License along with
  121. !  * GNU Smalltalk; see the file COPYING.  If not, write to the Free Software
  122. !  * Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  123. !  *
  124. !  ********************************************************************/
  125.   
  126. + #include "mstconfig.h"
  127. + #include "mstpaths.h"
  128.   
  129. ! #ifndef DEFAULT_LIBRARIES
  130.   #define DEFAULT_LIBRARIES -lm
  131. ! #endif
  132.   
  133. + /* The configuration files can define extra flags for the C compiler
  134. +  * using this definition
  135. +  */
  136.   #ifndef EXTRA_CC_FLAGS
  137.   #define EXTRA_CC_FLAGS
  138.   #endif
  139.   
  140.   
  141. + #ifdef USE_READLINE
  142. + READLINEDIR = READLINEDIRDEF
  143. + READLINEDEF = -DUSE_READLINE -I$(READLINEDIR)
  144. + READLINELIB = -L$(READLINEDIR)./readline -lreadline -ltermcap
  145. + #endif
  146. + 
  147. + #ifdef USE_DLD
  148. + DLDDIR = DLDDIRDEF
  149. + DLDDEF = -DDLD -I$(DLDDIR)
  150. + DLDLIB = -L$(DLDDIR) -ldld
  151. + #if defined(SUNOS40)
  152. + /* BINDING = -Bstatic */
  153. + #endif
  154. + #endif
  155. + 
  156. + 
  157. + #ifndef SYSTEM_MALLOC
  158. + #ifdef HAVE_ALLOCA
  159. + mallocobj = malloc.o
  160. + #else
  161. + mallocobj = alloca.o malloc.o
  162. + #endif
  163. + #endif
  164. + 
  165. + 
  166. + /* just to be sure the sh is used */
  167. + SHELL=/bin/sh
  168. + 
  169. + /* Enable recompilation of certain other files depending on system type.  */
  170. + 
  171.   #ifndef OTHER_FILES
  172.   #define OTHER_FILES
  173.   #endif
  174.   
  175. ! /* Enable inclusion of object files in temacs depending on system type.  */
  176.   #ifndef OBJECTS_SYSTEM
  177.   #define OBJECTS_SYSTEM
  178.   #endif
  179. ***************
  180. *** 25,53 ****
  181.   #endif
  182.   
  183.   
  184. ! #define HAVE_ALLOCA
  185.   
  186.   MAINTAINER = 'sbb@Eng.sun.com'
  187.   
  188. ! CFLAGS_NORMAL   = -g $(EXTRA_CC_FLAGS)
  189. ! CFLAGS_PROFILE  = -g -pg -DUSE_MONCONTROL $(EXTRA_CC_FLAGS)
  190. ! CFLAGS_OPTIMIZE = -O2 -DOPTIMIZE $(EXTRA_CC_FLAGS)
  191. ! 
  192. ! ;#undef PROFILE
  193. ! ;#undef NORMAL
  194. ! ;#define OPTIMIZE
  195. ! ;
  196. ! ;#ifdef PROFILE
  197. ! ;CFLAGS = $(CFLAGS_PROFILE) $(EXTRA_PACKAGES)
  198. ! ;#else
  199. ! ;#ifdef OPTIMIZE
  200. ! ;CFLAGS = $(CFLAGS_OPTIMIZE) $(EXTRA_PACKAGES)
  201. ! ;#else
  202. ! ;CFLAGS = $(CFLAGS_NORMAL) $(EXTRA_PACKAGES)
  203. ! ;#endif
  204. ! ;#endif
  205. ! CFLAGS = -mc68020 -m68881
  206.   
  207.   OBJS =  mstmain.o   mstlib.o    mst.tab.o   mstlex.o    mststr.o \
  208.       mstid.o     msttree.o   mstbyte.o   mstinterp.o mstcomp.o \
  209.       mstsym.o    mstdict.o   mstoop.o    mstsave.o   mstcint.o \
  210. --- 80,165 ----
  211.   #endif
  212.   
  213.   
  214. ! /* Some machines have alloca built-in.
  215. !  * They should define HAVE_ALLOCA, or may just let alloca.s
  216. !  * be used but generate no code.
  217. !  * Some have it written in assembler in alloca.s.
  218. !  * Some use the C version in alloca.c (these define C_ALLOCA in mstconfig.h).
  219. !  */
  220. ! 
  221. ! #ifdef C_ALLOCA
  222. ! ALLOCA = alloca.o alloc.o
  223. ! alloca.o: alloca.c
  224. ! #else
  225. ! #ifdef NEED_ALLOCA
  226. ! ALLOCA = alloca.o
  227. ! alloca.o : alloca.s mstconfig.h
  228. ! /* $(CPP) is cc -E, which may get confused by filenames
  229. !  * that do not end in .c.  So copy file to a safe name.  */
  230. !     cp alloca.s allocatem.c
  231. ! /* remove any ^L, blank lines, and preprocessor comments,
  232. !  * since some assemblers barf on them */
  233. !     $(CPP) allocatem.c | \
  234. !     sed -e 's/ //' -e 's/^#.*//' | \
  235. !     sed -n -e '/^..*$$/p' > allocatem.s
  236. !     -rm -f alloca.o
  237. ! /* Xenix, in particular, needs to run assembler via cc.  */
  238. !     $(CC) -c allocatem.s
  239. !     mv allocatem.o alloca.o
  240. !     rm allocatem.s allocatem.c
  241. ! #endif /* NEED_ALLOCA */
  242. ! #endif /* not C_ALLOCA */
  243. ! 
  244. ! 
  245. ! 
  246. ! /* System-specific programs to be made.
  247. !    OTHER_FILES, OBJECTS_SYSTEM and OBJECTS_MACHINE
  248. !    select which of these should be compiled.  */
  249. ! 
  250. ! 
  251.   
  252. + /*************
  253. +  *
  254. +  * These variables you may wish to change
  255. +  *
  256. +  *************/
  257. + 
  258. + /* Mail path to GNU Smalltalk maintainer (Steve Byrne) */
  259.   MAINTAINER = 'sbb@Eng.sun.com'
  260.   
  261. ! /* Compilation flags definitions */
  262. ! CFLAGS_NORMAL   = -g EXTRA_CC_FLAGS 
  263. ! CFLAGS_PROFILE  = -g -pg -DUSE_MONCONTROL EXTRA_CC_FLAGS 
  264. ! CFLAGS_OPTIMIZE = -O -DOPTIMIZE EXTRA_CC_FLAGS 
  265. ! 
  266. ! #ifdef SUNOS40
  267. ! /* +++ Sun hacks */
  268. ! CFLAGS_OPTIMIZE = -O3 -DOPTIMIZE EXTRA_CC_FLAGS 
  269. ! CFLAGS_TEST = -O3 -DOPTIMIZE -pg EXTRA_CC_FLAGS
  270. ! #endif
  271. ! 
  272. ! EXTRA_PACKAGES = $(READLINEDEF) $(DLDDEF)
  273. ! 
  274. ! #ifdef PROFILE
  275. ! /* Actual compilation flags and compiler definition */
  276. ! CFLAGS = $(CFLAGS_PROFILE) $(EXTRA_PACKAGES)
  277. ! #else
  278. ! #ifdef OPTIMIZE
  279. ! /* Actual compilation flags and compiler definition */
  280. ! CFLAGS = $(CFLAGS_OPTIMIZE) $(EXTRA_PACKAGES)
  281. ! #else
  282. ! /* Actual compilation flags and compiler definition */
  283. ! CFLAGS = $(CFLAGS_NORMAL) $(EXTRA_PACKAGES)
  284. ! #endif
  285. ! #endif
  286. ! 
  287. ! 
  288.   
  289. + /********************************************************************
  290. +  * The following definitions are not something that the casual user would
  291. +  * want to change.
  292. +  ********************************************************************/
  293. + 
  294.   OBJS =  mstmain.o   mstlib.o    mst.tab.o   mstlex.o    mststr.o \
  295.       mstid.o     msttree.o   mstbyte.o   mstinterp.o mstcomp.o \
  296.       mstsym.o    mstdict.o   mstoop.o    mstsave.o   mstcint.o \
  297. ***************
  298. *** 59,71 ****
  299.       mstsysdep.c mstcallin.c 
  300.   
  301.   
  302. ! LIBS =  $(DEFAULT_LIBRARIES) $(USER_LIBS) $(READLINELIB) $(DLDLIB)
  303.   
  304.   
  305.   all: mst
  306.   
  307.   mst: $(OBJS)
  308. !     $(CC) $(BINDING) -o mst $(CFLAGS) $(OBJS) $(LIBS) -lm
  309.   
  310.   mst.tab.h mst.tab.c: mst.y
  311.       bison -dv mst.y
  312. --- 171,183 ----
  313.       mstsysdep.c mstcallin.c 
  314.   
  315.   
  316. ! LIBS =  DEFAULT_LIBRARIES $(USER_LIBS) $(READLINELIB) $(DLDLIB)
  317.   
  318.   
  319.   all: mst
  320.   
  321.   mst: $(OBJS)
  322. !     $(CC) $(BINDING) -o mst $(CFLAGS) $(OBJS) $(LIBS)
  323.   
  324.   mst.tab.h mst.tab.c: mst.y
  325.       bison -dv mst.y
  326. ***************
  327. *** 74,81 ****
  328. --- 186,201 ----
  329.   
  330.   mstlex.o: mst.tab.h
  331.   
  332. + /* These depend on the oop table size */
  333.   mstsave.o mstoop.o mstlib.o mstsym.o: mstoop.h
  334.   
  335. + #if defined(SUNOS40) && defined(OPTIMIZE)
  336. + mstinterp.o: mstinterp.c
  337. +     $(CC) -O2 -DOPTIMIZE $(EXTRA_PACKAGES) -c mstinterp.c
  338. + #endif
  339. + 
  340. + /* !!! Clean these up in the future */ 
  341. + 
  342.   mstlib.o: mst.h
  343.   mstlib.o: mstconfig.h
  344.   mstlib.o: mst.tab.h
  345. ***************
  346. *** 197,202 ****
  347. --- 317,341 ----
  348.   mstcallin.o: mstoop.h
  349.   
  350.   
  351. + 
  352. + /*
  353. +  * Install the files into the proper place
  354. +  */
  355. + 
  356. + install:
  357. +     if test ! -d KERNEL_PATH ; then      \
  358. +         mkdir -p KERNEL_PATH ;           \
  359. +     fi
  360. +     cp *.st KERNEL_PATH
  361. +     (cd KERNEL_PATH; chmod +r *.st)
  362. +     if test ! -d IMAGE_PATH ; then      \
  363. +         mkdir -p IMAGE_PATH ;           \
  364. +     fi
  365. +     (x=`pwd`; cd IMAGE_PATH; $$x/mst -Vi)
  366. + 
  367. + /***
  368. +  *** Experimental Linting of the code
  369. +  ***/
  370.   lint: $(SRCS)
  371.       lint $(SRCS)
  372.   
  373. ***************
  374. *** 207,212 ****
  375. --- 346,363 ----
  376.   profile:
  377.       make CFLAGS='$(CFLAGS) -pg -Dprofiling'
  378.   
  379. + senddiffs: diffs
  380. +     kermit -e 1000 -s mst.diffs
  381. + 
  382. + mail-diffs:
  383. +     @echo "Please enter a brief note describing the contents of"
  384. +     @echo "the diffs file that you've created.  End with Ctrl-D."
  385. +     @cat > mst.diffs.note
  386. +     @echo "-----------------------------------" >> mst.diffs.note
  387. +     @### If there''s a more portable/better way to do this, please
  388. +     @### don''t hesitate to fix this and send the new version back -- SBB
  389. +     @cat mst.diffs.note mst.diffs | mail $(MAINTAINER)
  390. + 
  391.   diffs:
  392.       mk_mst_diffs
  393.   
  394. ***************
  395. *** 218,224 ****
  396.       rm -rf ./orig
  397.       mkdir ./orig
  398.       tar cbf 20 - `cat mstfiles` | (cd ./orig; tar xbBf 20 -)
  399. - 
  400.   
  401.   
  402.   
  403. --- 369,374 ----
  404.