代码搜索结果

# Commands covered: switch # # This file contains a collection of tests for one or more of the Tcl # built-in commands. Sourcing this file into Tcl runs the tests and # generates output for errors.

'\" '\" Copyright (c) 1993 The Regents of the University of California. '\" Copyright (c) 1994-1997 Sun Microsystems, Inc. '\" '\" See the file "license.terms" for information on usage and redistribut

### uVision2 Project, (C) Keil Software ### Do not modify ! cExt (*.c) aExt (*.a*; *.src) oExt (*.obj) lExt (*.lib) tExt (*.txt) pExt (*.plm) CppX (*.cpp) DaveTm { 0,0,0,0,0,0,0,0 }

#include void Switchdemo(void) { Byte outputstate; switch(outputstate) {case 1: P1_0=0; P1_1=0; P1_2=0; break; //跳出循环 case 2: P1_0=1; P1_1=0; P1_2=0; break;

Switch

BEGIN { if ($ENV{PERL_CORE}) { chdir('t') if -d 't'; @INC = qw(../lib); } } use Carp; use Switch qw(__ fallthrough); my($C,$M);sub ok{$C++;$M.=$_[0]?"ok $C\n":"not ok $C (lin

#!/usr/local/bin/perl -w use lib qw(t/lib); # Due to a bug in older versions of MakeMaker & Test::Harness, we must # ensure the blib's are in @INC, else we might use the core CGI.pm use lib qw(blib/

package com.javapatterns.command.lightandfan; public class Switch { private Command UpCommand, DownCommand; public Switch( Command Up, Command Down) { UpCommand =

var num = 2; switch(num) { // is the number 1 ? case 1 : alert("This is case 1 code"); break; // is the number 2 ? case 2 : alert("This is case 2 code"); break; // is the number 3 ?