fix .gitignore, Makefile, README.md for 2005/mikeash
This commit is contained in:
1 parent
e8d651b111
commit
a904f25d2a
3 files changed
+369
-38
No files matched your search
@@ -0,0 +1 @@
|
|||||||
|
mikeash
|
||||||
+321
-9
@@ -1,16 +1,328 @@
|
|||||||
C99=--std=c99
|
#!/usr/bin/env make
|
||||||
|
#
|
||||||
|
# IOCCC 2005 winning entry - mikeash
|
||||||
|
|
||||||
build: mikeash
|
################################################################################
|
||||||
|
#
|
||||||
|
# Regarding individual entries:
|
||||||
|
#
|
||||||
|
# IOCCC winning entry code may not work on your system. Even with standards,
|
||||||
|
# conditions and build environments change, especially when it comes to more
|
||||||
|
# extreme code such you might find in an IOCCC winner. Moreover, what was
|
||||||
|
# allowed and liked in one IOCCC contest may no longer be liked/allowed in
|
||||||
|
# later IOCCC years.
|
||||||
|
#
|
||||||
|
# Corrections on winning author and fixing typos in remarks are VERY WELCOME.
|
||||||
|
#
|
||||||
|
# GitHub pull requests are welcome:
|
||||||
|
#
|
||||||
|
# If you have a patch that might make running an entry work in modern Unix-like
|
||||||
|
# environments, please create a GitHub pull request for the IOCCC judges to
|
||||||
|
# consider.
|
||||||
|
#
|
||||||
|
# Suggestions and corrections regarding Makefiles, winning author information,
|
||||||
|
# fixing typos in remarks, and code patches are welcome via opening a GitHub
|
||||||
|
# issue or better yet, by creating a GitHub pull request for the IOCCC judges
|
||||||
|
# to consider. To form a GitHub issue or GitHub pull, please visit:
|
||||||
|
#
|
||||||
|
# https://github.com/ioccc-src/winner
|
||||||
|
#
|
||||||
|
################################################################################
|
||||||
|
|
||||||
|
# This work by Landon Curt Noll and Leonid A. Broukhis is licensed under:
|
||||||
|
#
|
||||||
|
# Creative Commons Attribution-ShareAlike 3.0 Unported License.
|
||||||
|
#
|
||||||
|
# See: http://creativecommons.org/licenses/by-sa/3.0/
|
||||||
|
|
||||||
|
|
||||||
|
#############################
|
||||||
|
# shell used by this Makefile
|
||||||
|
#############################
|
||||||
|
#
|
||||||
|
SHELL= bash
|
||||||
|
|
||||||
|
#######################
|
||||||
|
# common tool locations
|
||||||
|
#######################
|
||||||
|
#
|
||||||
|
include ../../var.mk
|
||||||
|
|
||||||
|
# Set X11_LIBDIR to the directory where the X11 library resides
|
||||||
|
#
|
||||||
|
#X11_LIBDIR= /usr/X11R6/lib
|
||||||
|
#X11_LIBDIR= /usr/X11/lib
|
||||||
|
X11_LIBDIR= /opt/X11/lib
|
||||||
|
|
||||||
|
# Set X11_INCLUDEDIR to the directory where the X11 include files reside
|
||||||
|
#
|
||||||
|
#X11_INCDIR= /usr/X11R6/include
|
||||||
|
#X11_INCDIR= /usr/X11/include
|
||||||
|
X11_INCDIR= /opt/X11/include
|
||||||
|
|
||||||
|
# Common C compiler warnings to silence
|
||||||
|
#
|
||||||
|
#CSILENCE=
|
||||||
|
CSILENCE= -Wno-error -Wno-implicit-function-declaration -Wno-extra-semi \
|
||||||
|
-Wno-unknown-escape-sequence -Wno-unused-variable
|
||||||
|
|
||||||
|
# Common C compiler warning flags
|
||||||
|
#
|
||||||
|
#CWARN= ${CSILENCE}
|
||||||
|
#CWARN= -Wall ${CSILENCE}
|
||||||
|
#CWARN= -Wall -Wextra ${CSILENCE}
|
||||||
|
CWARN= -Wall -Wextra -pedantic ${CSILENCE}
|
||||||
|
|
||||||
|
# Compiler standard
|
||||||
|
#
|
||||||
|
#CSTD=
|
||||||
|
#CSTD= -ansi
|
||||||
|
CSTD= -std=gnu99
|
||||||
|
|
||||||
|
# Compiler bit architecture
|
||||||
|
#
|
||||||
|
# Some entries require 32-bitness:
|
||||||
|
# ARCH= -m32
|
||||||
|
#
|
||||||
|
# Some entries require 64-bitness:
|
||||||
|
# ARCH= -m64
|
||||||
|
#
|
||||||
|
# By default we assume nothing:
|
||||||
|
#
|
||||||
|
ARCH=
|
||||||
|
|
||||||
|
# Defines that are needed to compile
|
||||||
|
#
|
||||||
|
CDEFINE=
|
||||||
|
#CDEFINE= -DIOCCC
|
||||||
|
|
||||||
|
# Include files that are needed to compile
|
||||||
|
#
|
||||||
|
CINCLUDE=
|
||||||
|
#CINCLUDE= -include stdlib.h
|
||||||
|
#CINCLUDE= -include stdio.h
|
||||||
|
#CINCLUDE= -include stdlib.h -include stdio.h
|
||||||
|
#CINCLUDE= -I ${X11_INCDIR} -I ${X11_INCDIR}/X11
|
||||||
|
#CINCLUDE= `${SDL2_CONFIG} --cflags`
|
||||||
|
|
||||||
|
# Optimization
|
||||||
|
#
|
||||||
|
# Most compiles will safely use -O2. Some can use only -O1 or -O.
|
||||||
|
# A few compilers have broken optimizers or this entry make break
|
||||||
|
# under those buggy optimizers and thus you may not want anything.
|
||||||
|
# Reasonable compilers will allow for -O3.
|
||||||
|
#
|
||||||
|
#OPT=
|
||||||
|
#OPT= -O
|
||||||
|
#OPT= -O1
|
||||||
|
#OPT= -O2
|
||||||
|
OPT= -O3
|
||||||
|
|
||||||
|
# Default flags for ANSI C compilation
|
||||||
|
#
|
||||||
|
CFLAGS= ${CSTD} ${CWARN} ${ARCH} ${CDEFINE} ${CINCLUDE} ${OPT}
|
||||||
|
|
||||||
|
# Libraries needed to build
|
||||||
|
#
|
||||||
|
LIBS=
|
||||||
|
#LIBS= -lm
|
||||||
|
#LIBS= -L ${X11_LIBDIR} -lX11
|
||||||
|
#LIBS= `${SDL2_CONFIG} --libs`
|
||||||
|
|
||||||
|
# C compiler to use
|
||||||
|
#
|
||||||
|
CC= cc
|
||||||
|
#CC=clang
|
||||||
|
#CC=gcc
|
||||||
|
|
||||||
|
# Compiler add-ons or replacements for clang only
|
||||||
|
#
|
||||||
|
ifeq ($(CC),clang)
|
||||||
|
#
|
||||||
|
CSILENCE+= -Wno-format-nonliteral -Wno-implicit-int-conversion -Wno-missing-prototypes \
|
||||||
|
-Wno-missing-variable-declarations -Wno-poison-system-directories \
|
||||||
|
-Wno-shorten-64-to-32
|
||||||
|
#
|
||||||
|
CWARN+= -Weverything
|
||||||
|
#
|
||||||
|
endif
|
||||||
|
|
||||||
|
# Specific add-ons or replacements for gcc only
|
||||||
|
#
|
||||||
|
ifeq ($(CC),gcc)
|
||||||
|
#
|
||||||
|
#CSILENCE+=
|
||||||
|
#
|
||||||
|
#CWARN+=
|
||||||
|
#
|
||||||
|
endif
|
||||||
|
|
||||||
|
|
||||||
|
##############################
|
||||||
|
# Special flags for this entry
|
||||||
|
##############################
|
||||||
|
#
|
||||||
|
ENTRY= mikeash
|
||||||
|
PROG= ${ENTRY}
|
||||||
|
#
|
||||||
|
OBJ= ${PROG}.o
|
||||||
|
DATA=
|
||||||
|
TARGET= ${PROG}
|
||||||
|
#
|
||||||
|
ALT_OBJ=
|
||||||
|
ALT_TARGET=
|
||||||
|
|
||||||
|
|
||||||
|
#################
|
||||||
|
# build the entry
|
||||||
|
#################
|
||||||
|
#
|
||||||
|
all: data ${TARGET}
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
.PHONY: all alt data everything clean clobber install \
|
||||||
|
love haste waste maker easter_egg sandwich \
|
||||||
|
supernova deep_magic magic charon pluto
|
||||||
|
|
||||||
|
${PROG}: ${PROG}.c
|
||||||
|
${CC} ${CFLAGS} $< -o $@ ${LIBS}
|
||||||
|
|
||||||
|
# alternative executable
|
||||||
|
#
|
||||||
|
alt: data ${ALT_TARGET}
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
# data files
|
||||||
|
#
|
||||||
|
data: ${DATA}
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
# both all and alt
|
||||||
|
#
|
||||||
|
everything: all alt
|
||||||
|
|
||||||
|
|
||||||
|
###############
|
||||||
|
# utility rules
|
||||||
|
###############
|
||||||
|
#
|
||||||
clean:
|
clean:
|
||||||
|
${RM} -f ${OBJ} ${ALT_OBJ}
|
||||||
clobber:
|
@-if [ -f indent.c ]; then \
|
||||||
-rm mikeash
|
echo ${RM} -f indent.c; \
|
||||||
|
${RM} -f indent.c; \
|
||||||
|
fi
|
||||||
|
|
||||||
mikeash: mikeash.c
|
clobber: clean
|
||||||
${CC} ${CFLAGS} ${C99} ${LDFLAGS} $< -o $@
|
${RM} -f ${TARGET} ${ALT_TARGET}
|
||||||
|
@-if [ -e sandwich ]; then \
|
||||||
|
${RM} -f sandwich; \
|
||||||
|
echo 'ate sandwich'; \
|
||||||
|
fi
|
||||||
|
|
||||||
alt:
|
install:
|
||||||
|
@echo "Dr. Spock says that is not logical!"
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
data:
|
# you may be able to misunderstand the source by reading indent.c
|
||||||
|
#
|
||||||
|
indent.c: ${PROG}.c
|
||||||
|
@if which "${GINDENT}" >/dev/null 2>&1; then \
|
||||||
|
echo ${RM} -f $@; \
|
||||||
|
${RM} -f $@; \
|
||||||
|
echo "${GINDENT} < $< > $@"; \
|
||||||
|
${GINDENT} < $< > $@; \
|
||||||
|
elif which "${INDENT}" >/dev/null 2>&1; then \
|
||||||
|
echo ${RM} -f $@; \
|
||||||
|
${RM} -f $@; \
|
||||||
|
echo "${INDENT} < $< > $@"; \
|
||||||
|
${INDENT} < $< > $@; \
|
||||||
|
else \
|
||||||
|
echo "no intent tool found, ident $< yourself, sorry"; \
|
||||||
|
echo "exit 1"; \
|
||||||
|
exit 1; \
|
||||||
|
fi
|
||||||
|
|
||||||
|
|
||||||
|
##################
|
||||||
|
# 133t hacker rulz
|
||||||
|
##################
|
||||||
|
#
|
||||||
|
love:
|
||||||
|
@echo 'not war?'
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
haste:
|
||||||
|
$(MAKE) waste
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
waste:
|
||||||
|
@echo 'haste'
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
maker:
|
||||||
|
@echo 'Participate in a maker faire'
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
easter_egg:
|
||||||
|
@echo "you expected to often misunderstand this $${RANDOM} magic"
|
||||||
|
@echo "chongo '<was here>' /\\oo/\\"
|
||||||
|
@echo "Eggy"
|
||||||
|
|
||||||
|
sandwich: easter_egg
|
||||||
|
@if [ `id -u` -eq 0 ]; then \
|
||||||
|
echo 'Okay.'; \
|
||||||
|
echo "$${RANDOM}`date +%s`$${RANDOM}" > $@; \
|
||||||
|
else \
|
||||||
|
echo 'What? Make it yourself.'; \
|
||||||
|
exit 1; \
|
||||||
|
fi
|
||||||
|
|
||||||
|
# Understand the history of the Homebrew Computer Club
|
||||||
|
# as well as the West Coast Computer Faire and
|
||||||
|
# you might be confused different. :-)
|
||||||
|
#
|
||||||
|
supernova: sandwich
|
||||||
|
@-if [ -r .code_anal ]; then \
|
||||||
|
${RM} -f .code_anal_v6; \
|
||||||
|
else \
|
||||||
|
echo "planet deniers, like some members of the IAU, are so cute when they try to defend their logic"; \
|
||||||
|
fi
|
||||||
|
@echo "A $@ helps ${MAKE} the elements that help form planets"
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
deep_magic: supernova
|
||||||
|
@-if [ -r .code_anal ]; then \
|
||||||
|
ccode_analysis --deep_magic 7889066cdbdf09b0408021754586e895be641cc9be29e7eafd3ca65359541f17 \
|
||||||
|
--FNV1a_hash_512_bit -v2 "${PROG}" "${PROG}.c"; \
|
||||||
|
else \
|
||||||
|
echo "Wrong! Do it again!"; \
|
||||||
|
sleep 2; \
|
||||||
|
echo "Wrong! Do it again!"; \
|
||||||
|
sleep 2; \
|
||||||
|
echo "Wrong! Do it again!"; \
|
||||||
|
fi
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
magic: deep_magic
|
||||||
|
@-if [ -r .code_anal ]; then \
|
||||||
|
ccode_analysis --level 20003 --mode 5717175 --FNV1a_hash_512_bit -v2 "${PROG}" "${PROG}.c"; \
|
||||||
|
else \
|
||||||
|
echo "If you don't eat yer meat, you can't have any pudding!"; \
|
||||||
|
echo "How can you have any pudding if you don't eat yer meat?!"; \
|
||||||
|
fi
|
||||||
|
@${TRUE}
|
||||||
|
|
||||||
|
# The IOCCC resident astronomer states
|
||||||
|
#
|
||||||
|
charon: magic
|
||||||
|
@echo "$@ is a dwarf planet"
|
||||||
|
@echo "dwarf is a type of planet"
|
||||||
|
@echo "therefore IAU, $@ is a planet"
|
||||||
|
|
||||||
|
pluto: charon
|
||||||
|
${MAKE} charon
|
||||||
|
@echo "$@ is a dwarf planet"
|
||||||
|
@echo "dwarf is a type of planet"
|
||||||
|
@echo "therefore, $@ is a planet"
|
||||||
|
@echo "having lots of planets is good feature because supernovae can help ${MAKE} a lot of them"
|
||||||
+47
-29
@@ -1,10 +1,29 @@
|
|||||||
# Best use of parenthesis
|
# Best use of parenthesis
|
||||||
|
|
||||||
Michael Ash
|
Michael Ash
|
||||||
USA
|
USA
|
||||||
mike@mikeash.com
|
mike@mikeash.com
|
||||||
|
|
||||||
## Judges' comments
|
# To build:
|
||||||
|
|
||||||
|
```sh
|
||||||
|
make
|
||||||
|
```
|
||||||
|
|
||||||
|
### To run:
|
||||||
|
|
||||||
|
```sh
|
||||||
|
./mikeash
|
||||||
|
```
|
||||||
|
|
||||||
|
### Try:
|
||||||
|
|
||||||
|
```sh
|
||||||
|
./mikeash < mikeash.c
|
||||||
|
./mikeash < mikeash.c | diff - mikeash.c
|
||||||
|
```
|
||||||
|
|
||||||
|
## Judges' comments:
|
||||||
|
|
||||||
Having problems speaking code? Do you LISP? Parenthetically
|
Having problems speaking code? Do you LISP? Parenthetically
|
||||||
speaking, this entry takes advantage of C99 features, while
|
speaking, this entry takes advantage of C99 features, while
|
||||||
@@ -12,16 +31,7 @@ speaking parenthetically. Best of all, it self-reproduces!
|
|||||||
|
|
||||||
John McCarthy might not of imagined it quite like this! :-)
|
John McCarthy might not of imagined it quite like this! :-)
|
||||||
|
|
||||||
### To build
|
## Author's comments:
|
||||||
|
|
||||||
gcc --std=c99 -o mikeash mikeash.c
|
|
||||||
|
|
||||||
### To run
|
|
||||||
|
|
||||||
mikeash < mikeash.c
|
|
||||||
mikeash < mikeash.c | diff - mikeash.c
|
|
||||||
|
|
||||||
## Author's comments
|
|
||||||
|
|
||||||
This program is a self-reproducing program, which is on the IOCCC's list
|
This program is a self-reproducing program, which is on the IOCCC's list
|
||||||
of discouraged program types. Worse, it's a self-reproducing program
|
of discouraged program types. Worse, it's a self-reproducing program
|
||||||
@@ -42,14 +52,18 @@ integer-to-pointer conversions due to the implicitly-declared functions.
|
|||||||
|
|
||||||
Try:
|
Try:
|
||||||
|
|
||||||
echo '(format t "~s" (+ 2 2 ))' | ./lispob
|
```sh
|
||||||
|
echo '(format t "~s" (+ 2 2 ))' | ./lispob
|
||||||
|
```
|
||||||
|
|
||||||
You should see '4"' echoed on your command prompt. The " after the 4 and
|
You should see '4"' echoed on your command prompt. The " after the 4 and
|
||||||
the lack of a newline are due to the somewhat broken implementation of
|
the lack of a newline are due to the somewhat broken implementation of
|
||||||
the format function. More sophisticated arithmetic expressions may be
|
the format function. More sophisticated arithmetic expressions may be
|
||||||
used:
|
used:
|
||||||
|
|
||||||
echo '(format t "~s" (* (+ 2 2 ) (- 5 (/ 9 3 ))))' | ./lispob
|
```sh
|
||||||
|
echo '(format t "~s" (* (+ 2 2 ) (- 5 (/ 9 3 ))))' | ./lispob
|
||||||
|
```
|
||||||
|
|
||||||
This evaluates the expression (2+2) * (5 - 9/3) giving the correct
|
This evaluates the expression (2+2) * (5 - 9/3) giving the correct
|
||||||
result, 8. Note that due to the highly ad-hoc nature of the tokenizer,
|
result, 8. Note that due to the highly ad-hoc nature of the tokenizer,
|
||||||
@@ -64,48 +78,52 @@ Aside from being required to put spaces between tokens and closing
|
|||||||
parentheses, there are other limitations on the dialect of Common Lisp
|
parentheses, there are other limitations on the dialect of Common Lisp
|
||||||
that this program understands:
|
that this program understands:
|
||||||
|
|
||||||
* The only built-in functions are defvar, format, substitute, char-upcase,
|
* The only built-in functions are defvar, format, substitute, char-upcase,
|
||||||
+, -, *, and /.
|
+, -, *, and /.
|
||||||
|
|
||||||
* Only one variable is available. This variable is called 'q', although any
|
* Only one variable is available. This variable is called 'q', although any
|
||||||
symbol name starting with the letter 'q' will be mapped to this variable.
|
symbol name starting with the letter 'q' will be mapped to this variable.
|
||||||
|
|
||||||
* Only the first letter of a function name is significant. For example,
|
* Only the first letter of a function name is significant. For example,
|
||||||
format, f, farm, and various other words starting with 'f' will all map to the
|
format, f, farm, and various other words starting with 'f' will all map to the
|
||||||
format function.
|
format function.
|
||||||
|
|
||||||
* The defvar function completely ignores its first parameter. It will always
|
* The defvar function completely ignores its first parameter. It will always
|
||||||
store the result of evaluating its second parameter in 'q'. Unlike in Common
|
store the result of evaluating its second parameter in 'q'. Unlike in Common
|
||||||
Lisp, multiple invocations of defvar on the same variable will overwrite old
|
Lisp, multiple invocations of defvar on the same variable will overwrite old
|
||||||
values.
|
values.
|
||||||
|
|
||||||
* Character constants are limited to #\Newline and single-character
|
* Character constants are limited to #\Newline and single-character
|
||||||
constants such as #\x.
|
constants such as #\x.
|
||||||
|
|
||||||
* The char-upcase function will give strange results if passed something
|
* The char-upcase function will give strange results if passed something
|
||||||
other than a lowercase character.
|
other than a lowercase character.
|
||||||
|
|
||||||
* The format function takes exactly three parameters. The first parameter is
|
* The format function takes exactly three parameters. The first parameter is
|
||||||
ignored; output always goes to stdout. The second parameter must have exactly
|
ignored; output always goes to stdout. The second parameter must have exactly
|
||||||
one ~s format specifier in it, and no other format specifiers are permitted.
|
one ~s format specifier in it, and no other format specifiers are permitted.
|
||||||
|
|
||||||
* The arithmetic functions take exactly two parameters.
|
* The arithmetic functions take exactly two parameters.
|
||||||
|
|
||||||
* All tokens must be separated from a following ) by whitespace.
|
* All tokens must be separated from a following ) by whitespace.
|
||||||
|
|
||||||
* A lot of other things. Notably, the language which this program interprets
|
* A lot of other things. Notably, the language which this program interprets
|
||||||
is nowhere near Turing-complete.
|
is nowhere near Turing-complete.
|
||||||
|
|
||||||
Basically, the lisp interpreter is good for some basic math operations, and
|
Basically, the lisp interpreter is good for some basic math operations, and
|
||||||
for running itself. To do the latter, try this:
|
for running itself. To do the latter, try this:
|
||||||
|
|
||||||
./lispob < lispob.c > lispob2.c
|
```sh
|
||||||
diff lispob.c lispob2.c
|
./lispob < lispob.c > lispob2.c
|
||||||
|
diff lispob.c lispob2.c
|
||||||
|
```
|
||||||
|
|
||||||
The program can also be run from an implementation of common lisp. To do
|
The program can also be run from an implementation of common lisp. To do
|
||||||
this, run the common lisp compiler and then type the following command:
|
this, run the common lisp compiler and then type the following command:
|
||||||
|
|
||||||
(load "lispob.c")
|
```
|
||||||
|
(load "lispob.c")
|
||||||
|
```
|
||||||
|
|
||||||
The source code of lispob.c will be printed.
|
The source code of lispob.c will be printed.
|
||||||
|
|
||||||
|
|||||||
Reference in new issue
Block a user