<?php
echo 'poop';
?>

; Poor-man's Object-Oriented Programming
;                   or
;                  POOP
(module POOP
   (import Utility)

        self.search(key)
    end
    def poop
         puts "hi there."
    end

; Poor-man's Object-Oriented Programming
;                   or
;                  POOP
(module POOP
   (import Utility)

   ;; when > 3, leads to a loss of an additional ttl minute each minute
   ;; when > 3, leads to an additional stress point each minute
   ;; poop is incremented at each meal
   (poop :update :initform 0)
   (last-action-time :update :initform (get-universal-time))))

            (import Errors)
            (include "macros.sch")
            (include "poop.sch")
            (export (empty-env))))

/*
poop: POP3 Server for Linux
Copyright (C) 2002 Tristan Van de Vreede
This program is free software; you can redistribute it and/or

            (import Errors)
            (include "macros.sch")
            (include "poop.sch")
            (export (empty-env))))

(module Bigloo-Target
   (include "poop.sch")
   (import Installation-Params)
   (import Target-List)

(module Scheme48-Target
   (include "poop.sch")
   (import Installation-Params)
   (import Target-List)

/*
poop: POP3 Server for Linux
Copyright (C) 2002 Tristan Van de Vreede
This program is free software; you can redistribute it and/or

          if ($CIN=LWP::Simple::get($out[1]) )
          {
               foreach $poop (split /\n/, $CIN)
          {
                    if ($poop=~/$out[3]/)

# test exceptions
##
class PoopError(Exception): pass
class FailError(Exception): pass
class DieError(Exception): pass

  EXDLL_INIT();
  // note if you want parameters from the stack, pop them off in order.
  // i.e. if you are called via exdll::myFunction file.dat poop.dat
  // calling popstring() the first time would give you file.dat,
  // and the second time would give you poop.dat.

  EXDLL_INIT();
  // note if you want parameters from the stack, pop them off in order.
  // i.e. if you are called via exdll::myFunction file.dat poop.dat
  // calling popstring() the first time would give you file.dat,
  // and the second time would give you poop.dat.

  EXDLL_INIT();
  // note if you want parameters from the stack, pop them off in order.
  // i.e. if you are called via exdll::myFunction file.dat poop.dat
  // calling popstring() the first time would give you file.dat,
  // and the second time would give you poop.dat.

  EXDLL_INIT();
  // note if you want parameters from the stack, pop them off in order.
  // i.e. if you are called via exdll::myFunction file.dat poop.dat
  // calling popstring() the first time would give you file.dat,
  // and the second time would give you poop.dat.

  EXDLL_INIT();
  // note if you want parameters from the stack, pop them off in order.
  // i.e. if you are called via exdll::myFunction file.dat poop.dat
  // calling popstring() the first time would give you file.dat,
  // and the second time would give you poop.dat.

          print "<br><br><br>selectName = $selectName
          <br>selectPassword = $selectPassword
          <br>poopStainMode = $poopStainMode
          <br>selectMenu = $selectMenu
          <br>id = $id

          print "<br><br><br>selectName = $selectName
          <br>selectPassword = $selectPassword
          <br>poopStainMode = $poopStainMode
          <br>selectMenu = $selectMenu
          <br>id = $id

# test exceptions
##
class PoopError(Exception): pass
class FailError(Exception): pass
class DieError(Exception): pass

        Integer b = new Integer(2);
        Integer c = new Integer(3);
        String poop = new String("poop");
        String scoop = new String("scoop");
        String doop = new String("dcoop");

  EXDLL_INIT();
  // note if you want parameters from the stack, pop them off in order.
  // i.e. if you are called via exdll::myFunction file.dat poop.dat
  // calling popstring() the first time would give you file.dat,
  // and the second time would give you poop.dat.

       "ref p,"
       // Definitions
       "newcommand poOP,"
       "renewcommand poOP,"
       "newenvironment poOPP,"

(module test-lazy-init
   (include "poop.sch")
   (main test)
   )