File: highlight.pike

package info (click to toggle)
libsyntax-highlight-engine-kate-perl 0.14%2Bdfsg-4
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, sid, trixie
  • size: 3,844 kB
  • sloc: perl: 84,065; ruby: 176; asm: 166; cpp: 144; jsp: 128; haskell: 116; sh: 111; f90: 99; python: 98; ml: 75; javascript: 61; xml: 43; yacc: 37; ansic: 32; tcl: 29; lisp: 24; makefile: 15; awk: 13; php: 5
file content (24 lines) | stat: -rw-r--r-- 615 bytes parent folder | download | duplicates (24)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
#! /bin/env pike

/* This file is a syntax highlight test for Kate.
 * FIXME: Improve it to contain more (and more unusual) syntax examples.
 */


#define PIKE_ON_THE_WEB  /* Is this address correct? */  "http://pike.ida.liu.se/"


int main(int argc, array(string) args)
{
  // Write funny things with Pike :)
  write(`+("Command line arguments (%d of them): ", @map(args, `+, " ")) + "\n", argc);
                             
  write("\nVisit Pike site at %s\n\n", PIKE_ON_THE_WEB);

  for (int i = 1; i <= 3; i++)
    write(":" + ")" * i + "   ");

  write("\n" + ({"Bye", "bye"}) * "-" + "!\n");

  return 0;
}