From c23c71da9cc12754fd37190d41d84b2d93c740c5 Mon Sep 17 00:00:00 2001 From: Lars Brinkhoff Date: Mon, 25 Jun 2018 21:44:17 +0200 Subject: [PATCH] CRC - compute file CRC. --- build/misc.tcl | 4 ++++ doc/programs.md | 1 + src/gren/crc.70 | Bin 0 -> 6016 bytes 3 files changed, 5 insertions(+) create mode 100644 src/gren/crc.70 diff --git a/build/misc.tcl b/build/misc.tcl index b8ae6c8a..88d84ed5 100644 --- a/build/misc.tcl +++ b/build/misc.tcl @@ -701,6 +701,10 @@ expect ":KILL" respond "*" ":midas sys2;ts comify_sysen3;comify\r" expect ":KILL" +# CRC +respond "*" ":midas sys3;ts crc_gren; crc\r" +expect ":KILL" + # TMPKIL respond "*" ":midas sys2;ts tmpkil_syseng;tmpkil\r" expect ":KILL" diff --git a/doc/programs.md b/doc/programs.md index 8e97a67c..ba79097a 100644 --- a/doc/programs.md +++ b/doc/programs.md @@ -39,6 +39,7 @@ - COMPLR, Lisp compiler. - COMSAT, mail server. - CMD, DDT subroutines. +- CRC, compute file CRC. - CREATE, creates a text file in your home directory from console input. - CROCK, analog watch. - CROSS, cross assembler for micros. diff --git a/src/gren/crc.70 b/src/gren/crc.70 new file mode 100644 index 0000000000000000000000000000000000000000..329dc2c5f5d7e8f478f0be63aa257518c1a3fb45 GIT binary patch literal 6016 zcmc&&ZByGw63$o6ubAR0yO14hWIG{e*4dS10V1~KwL~rnm8}xCz#_Kfl4J<`qw^c? z=^n{8+1$5H9hHD)rl+T;`{}niIec+AN@h`kzd{(H8x9@WwI{Ybl=kCvkxb~euxeIH>|~NmM7(W+1*S*fZh==4t#m(h3-%~{wYuNoio?tFT3|^ z8hSd{aXcK9D4YJci4jrA{e4emJ?au%LTz4Asc$*`raI-R5Aqa&rRtiX2Nir~{H zVN^l|t{9AbOwu2vcXpyK>j#K{!QCL-+}IyG9^V*RSE_Mo z`MB(Jdyy=c8wFei$rreTY(gPT($+V6Fp9YRYbkHa$5jk__9u?@R+>oqZAe3Wk5;%xcWahoI1r5xJQ~rc zy6VUZ?Qweg3X2@)+7cg)As3HX1|K^GP-4+dWn_!WQkbHNR?)dnalKZnmwelV35crEZRu2 zQkLaorXUmVo+YsmTFI=ap$t3f6`i}QNm3zJOl4}#1ebjdHZrGPF^KPhH&z+Z#`nn-`sLMelp{@O z8eD+v0x`91>+L~`+itdFwEWv{OzIecYqiy>*V1V8}x@Zk) zt(sbG@Lh`3xE1^c!1iR|StAB^Be;ZeNrlhuAUn>?_AqKi~}eBO~JiBy!JT%)Ez?35b;dzNqLHh z)0F@ZrB)hY0g^rzQzUATBHd63)iIL}(;+llmk>BvEaJ3^nOPAdcNEyEtwDy;1j2A< z$$df-Eu;l-N6H{vkm{}Mjus5#WV#=k2XYnNBH%5u^j7ZY8S1rocEAh^R4ini>^|Lm z#b8Q^iORWg5?vSBVqM0IM-HWn2uMUxXd@& zwf#wd_;#z^=l1m~zlSEyfQy?vF6LSrwRy?t+78bzigvq6U9AL1wO>-jq;=qIR6xdaHVV)R*@3dQw5eVSJI|({y9Sj;aHt_N0~CiZ zEkN0VCB5}xfkX`ut)kg10jMLODu$=+$Bo;DJPpSOQXby^Mg9k%f`Lw?L3S6>_4tep zgtlU^SOZ0dXNx*8==Uz8-CS3MC3=iKG4%a0GB_o&K1s`Ei>;t?^cxc028z7F0BguW zXeL~Ip`YMyd*p(EN3K7?Co-50mb@R4@=RLFJfq8=_%cW=k^ScYrV@AOJ&G1s8J74Gy&B`>scpui_n8RMin8 z-nXWO7^HHTEt*addfguxYuAa$gpR_I2%|!1 zLAq2MAb{~*v~j}!IG*!zr^s9Z8x#M2TNyq@KcilXF0md^?e##)AfFrswEp}P%}-syx6SQ3hmcZd$F9o23% z0DM&c_y#D2CP31yE>rvMbO9sZ>3I&ARBAE}mzpMb71WO~gAGn85i^+vDk7r>DqK|q zm4vK;n$D)nWDC^10xIiE12sx+p8}OD5x57CN}P6(iiUoRR1YLTBf%A(YHPq!2BYwX z>06-KrW-;v)HhUc`WWZg;divIbzNW|4Bk;%H$pJ@yH#uO6-nl{oO8HjSKUDvHFUf;<7fuA(^!-}Dh29u5FNgEgvJf= z*DOvI1i;I|Muyd5T`-@@_@`BMF^H!)M$m!KB8O@AgDOa4O>@zu$v%)*OXHFzwb&>~ zxd5HP-pCA99q0YZR)rmrxq!U6bZewfIbHP4;*+RXZz^Y{ztpE^ly;XE$uYDONMdp(_VLhedZ;*;u*L+pTC11buzil%0{IP)(ET1;f=VL9$c_%@ zO^SuQZ`V6oi-yuEOA?5z(e-X+jgsgA)_&4_aF;95<@u+JY z^0T4ZJSO#rzWrA6q@agHy!LbrJ&BRy3F8n6Pb&+ytls!ghBO6hrE44s+*$vDiRuTZ zH%%d`CyXPibeMoUD*DoOF3*v7(#Mav_B(6hT73xM1))Xvu)=ek244vIK`KQbSd`hS c(P+pQ*AJ1L)4vx2kL-9Pmiz$s?Af#b0z&Kh*#H0l literal 0 HcmV?d00001