From: sewiv@izzy.net (Sanford E. Walke IV)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: 22 May 1995 15:21:37 -0400

Andrew C Bulhak (acb@bruce.cs.monash.edu.au) wrote:
> Charlie Gibbs (Charlie_Gibbs@mindlink.bc.ca) wrote:
>
> : Forth love if honk then
>
> /PostScript love {honk} {} ifelse

actually, wouldn't that be

PostScript love eq {honk} {} ifelse

Or even simpler:

PostScript love eq {honk} if
----- 
Sandy 							Sysadmin
sewiv@izzy.net						Isthmus Corporation
"The strongest reason for the people to retain the right to keep and bear arms
is, as a last resort, to protect themselves against tyranny in government."
           - Thomas Jefferson, Proposal Virginia Constitution, June 1776
I don't speak for anyone but me, and sometimes not even that.




From: xuuah@csv.warwick.ac.uk (Daniel Barlow)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: 22 May 1995 01:27:03 +0100

  $you{'love'} =~ /^Perl/ && &honk;

Daniel

-- 
xuuah@csv.warwick.ac.uk // Daniel Barlow // daniel.barlow@sjc.ox.ac.uk

``There is no dark side of the moon, really.  Matter of fact, it's all dark''





From: Charlie_Gibbs@mindlink.bc.ca (Charlie Gibbs)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: Tue, 23 May 95 17:49:58 -0800

    if (love (C))
        honk ();

Charlie_Gibbs@mindlink.bc.ca
Honk if your horn is broken.




From: bdowning@prairienet.org (Brian C. Downing)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: 25 May 1995 04:43:15 GMT

<< IF LOVE 1 == THEN HONK END "UserRPL" DROP >>

   * or

:: LOVE ONE #= IT :: HONK ; "SysRPL" DROP ;

-Brian Downing
--
        Brian Downing / bdowning@prairienet.org     \"It does not do to leave a
   http://www.prairienet.org/~bdowning/homepage.html \ live dragon out of your
    Monticello Railway Museum / mrm@prairienet.org    \ calculations, if you
 http://www.prairienet.org/community/mrm/homepage.html \ live near nim." - JRRT



From: gkemp@IRO.UMontreal.CA (Greg Kemp)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: 31 May 1995 15:10:13 GMT

Haven't seen this yet:

(honk (lovep (Lisp)))

--
Greg Kemp
gkemp@eng.clemson.edu
"Would you trade your words for freedom?"



From: mark_cleveland@gateway.apple.com (Mark Cleveland)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: Wed, 31 May 1995 19:21:06 -0800

Fortran:

       IF (LOVE (FORTRAN) .EQ. TRUE) CALL HONK()


MPW Shell scripting:

If "`Love 'MPW Shell'`" =~ /Yes/
   PlaySound Honk
End



Z-80 assembler (for the truely silly):

   LD    A,Z80
   CP    LOVE
   CALL  Z,HONK

-- 
Mark Cleveland                                mark_cleveland@gateway.apple.com



From: dtrg@st-andrews.ac.uk (David Thomas Richard Given)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: 6 Jun 1995 11:07:49 GMT

Go for ARM assembler, instead. It's much easier, faster, and more 
powerful than Z80:

	LDRS R0, LoveARMflag
	BLNE Honk

LDRS: Load register, set flags on result
BLNE: Branch-link if Z flag not set.

-- 
Why do people surf the Information | GCS -d+(?)(++) p(-+)(---) c++++ !l+(+)
Superhighway? Won't they get run   | u++ e*(++) m*(++) s !n h+(++) f+ g+
over?                              | w+(+++) t--(+) r y? (Archimedes owner)
http://www.st-andrews.ac.uk:80/~www_sa/socs/virtual (Use at your own risk)




From: mpk@eniac.demon.co.uk (Mike Knell)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: 20 May 1995 21:55:06 +0100

#!/bin/sh
if love $sh
then
	/usr/bin/honk
else
	exec /bin/csh
fi

-- 
- Mike Knell, mpk@eniac.demon.co.uk - Dictator of alt.fan.pratchett.announce. -
- Write failed on device /dev/brain0: Filesystem full.



From: lemay@cs.colorado.edu (Matt LeMay)
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: 21 May 1995 00:17:01 GMT

typedef enum { true= 1, false= 0 } boolean;

extern void honk (void);

class life

{
  boolean _love;
  public:
    life () { _love= false; }
    life (boolean state) { _love= state; }
    void is_satisfied (void);
};

void life:: is_satisfied (void)

{
  if (_love == true)
    honk ();
} /* life:: is_satisfied */

int main (int arg_count, char *arguments[])

{
  life none;
  if (arg_count == 1)
    none= (life) life ();
  else
    none= (life) life ((boolean) !strcmp (arguments[1], "true"));
  none.is_satisfied ();
} /* main */

// write your own damn honk :)

>-- 
>- Mike Knell, mpk@eniac.demon.co.uk - Dictator of alt.fan.pratchett.announce. -
>- Write failed on device /dev/brain0: Filesystem full.

-- 
-Matt (lemay@cs.colorado.edu)





From: Robert Billing <unclebob@tnglwood.demon.co.uk>
Newsgroups: alt.folklore.computers
Subject: Re: Honk if you love...
Date: 20 May 1995 12:40:04 +0100

          TST  LOVE    ; Why did we all stop using the PDP-11?
          BEQ  1$
          MOV  #HONK,R0
      1$:

-- 
Tanglewood (tnglwood.demon.co.uk) is a bungalow in southern England,
close to 0 deg 46 min W 51 deg 22 min N. I am Robert Billing, Christian,
inventor, traveller, cook and animal lover.
"If you can see beauty in the world, then you are reading God's .sig"




Newsgroups: alt.folklore.computers
From: Steven Mading <Steven.Mading@mixcom.com>
Subject: Re: Honk if you love...
Date: Sun, 21 May 1995 02:07:36 GMT

int youlove,love,honk,don't_honk;   /* of course, I don't think ' is allowed
                                         in variable names. */
youlove = love  ?  honk() : dont_honk() ;

Steven.Mading@mixcom.com - In order to prevent programmers from
being able to make mistakes one would need to prevent programmers
from being able to make programs.  Hence if your goal is to avoid
programming errors then there's no point in drafting up constricting
rules and regulations.  Just delete the compiler from the system.
It is a much faster and more complete means toward the same ends.

