chiark / gitweb /
Many improvements. Now we get as far as SHA256 not being implemented.
authorian <ian>
Sat, 21 Sep 2002 16:09:50 +0000 (16:09 +0000)
committerian <ian>
Sat, 21 Sep 2002 16:09:50 +0000 (16:09 +0000)
base/chiark-tcl.h
base/troglodyte-Makefile
hbytes/hbytes.h

index 7b66932..383eb53 100644 (file)
@@ -41,7 +41,7 @@
  *  ulong mask A B                         => A & B
  *  ulong add A B                          => A + B  (mod 2^32)
  *  ulong subtract A B                     => A - B  (mod 2^32)
- *  ulong compare A B                      => 0/-1/1
+ *  ulong compare A B                      => 0  -1 (A<B)  +1 (A>B)
  *  ulong shift l|r ULONG BITS             fails if BITS >32
  *
  *  ulong ul2bitfields VALUE [SIZE TYPE [TYPE-ARG...] ...]  => 0/1
index 0737bbb..fbcfc8f 100644 (file)
@@ -25,7 +25,7 @@ AUTO_HDRS=    tables.h
 AUTO_SRCS=     tables.c
 AUTOS=         $(AUTO_HDRS) $(AUTO_SRCS)
 
-TARGETS=       hbytes.so
+TARGETS=       hbytes.so autocode.tcl autococo.tcl
 
 CC_CRYPTO=     $(CC) $(CFLAGS) $(CPPFLAGS) -O3
 CFLAGS=                -g -Wall -Wmissing-prototypes -Wstrict-prototypes -Werror \
@@ -37,6 +37,10 @@ all:         $(TARGETS) $(AUTOS)
 hbytes.so:     $(OBJS)
                $(CC) $(CFLAGS) $(LDFLAGS) -o $@ -shared $(OBJS) $(LDLIBS)
 
+autoco%.tcl:   deco%gen.tcl decobogen.tcl general.tcl ./hbytes.so \
+                       protocol.deco
+               ./$< protocol.deco >$@.new && mv -f $@.new $@           
+
 %.c:           %.tct tcmdifgen
                ./tcmdifgen -wc -o$@ $<
 
index 7b66932..383eb53 100644 (file)
@@ -41,7 +41,7 @@
  *  ulong mask A B                         => A & B
  *  ulong add A B                          => A + B  (mod 2^32)
  *  ulong subtract A B                     => A - B  (mod 2^32)
- *  ulong compare A B                      => 0/-1/1
+ *  ulong compare A B                      => 0  -1 (A<B)  +1 (A>B)
  *  ulong shift l|r ULONG BITS             fails if BITS >32
  *
  *  ulong ul2bitfields VALUE [SIZE TYPE [TYPE-ARG...] ...]  => 0/1