That was only Yesterday

 

 

IEFBR14 ( BRANCH all’indirizzo contenuto nel Registro 14  )    

IEFBR14 START
        USING IEFBR14,15  Establish addressability
        BR    GO          Skip over our name
        DC    AL1(L'ID)   Length of name
ID      DC    C'IEFBR14'  Name itself
        DS    0H          Force alignment
GO      SR    15,15       Zero out register 15 - ( Condition Code )
        BR    14          Return addr in R14 - ( Return to scheduler )

END   IEFBR14

HELLO WORLD : Assembler/370 – DOS/VS – TSO  (1975)

*******************************************************************
* NAME : HELLOWORLD *
*******************************************************************
*
HELLOTSO START 0 IN THE BEGINNING...
*        PRINT NOGEN SPARE US THE MACRO EXPANSIONS
MAIN     SAVE (14,12) SAVE INPUT REGISTERS
         LR 12,15 WHERE ARE WE?
         USING HELLOTSO,12 RIGHT HERE
         ST 13,SAVE+4 SAVE OLD SAVE AREA ADDRESS
         LA 11,SAVE POINT TO NEW SAVE AREA
         ST 11,8(13) IN OLD SAVE AREA
         LR 13,11 MOVE SAVE AREA ADDRESS
*
* WRITE 'HELLO, WORLD!' TO THE TSO SESSION
*
DOPUT    EQU *
         TPUT HELLOMSG,L'HELLOMSG,EDIT   SEND THE LINE
         B DOPUT                         AND DO IT AGAIN
*
* THIS CODE WILL NEVER BE REACHED, BUT IS INCLUDED FOR COMPLETENESS
*
EXIT     L 13,SAVE+4 GET OLD SAVE AREA BACK
         RETURN (14,12),RC=(15) QUIT
*
* FILE AND WORK AREA DEFINITIONS
*
SAVE     DS 18F LOCAL SAVE AREA
HELLOMSG DC C'HELLO, WORLD!'
         END MAIN

 
HELLO WORLD : Java Servlet  (2008)

/*
* Hello World in Java (Servlet)
*/
import java.io.*;
import javax.servlet.*;
import javax.servlet.http.*;

public class HelloWorld extends HttpServlet
{
     public void doGet (HttpServletRequest request, HttpServletResponse response)
                       throws ServletException, IOException
     {
        PrintWriter out;
        String text = "Hello World in Java (Servlet)";

        response.setContentType("text/html");
        out = response.getWriter();

        out.println("");
        out.println(text);
        out.println("");

        out.close();
    }
}

 

… my first data store 

Annunci
  1. Non c'è ancora nessun commento.
  1. No trackbacks yet.

Rispondi

Inserisci i tuoi dati qui sotto o clicca su un'icona per effettuare l'accesso:

Logo WordPress.com

Stai commentando usando il tuo account WordPress.com. Chiudi sessione / Modifica )

Foto Twitter

Stai commentando usando il tuo account Twitter. Chiudi sessione / Modifica )

Foto di Facebook

Stai commentando usando il tuo account Facebook. Chiudi sessione / Modifica )

Google+ photo

Stai commentando usando il tuo account Google+. Chiudi sessione / Modifica )

Connessione a %s...