Skip to content

Instantly share code, notes, and snippets.

@freeonterminate

freeonterminate/小木曽.pas

Last active December 23, 2015 14:19
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save freeonterminate/6648532 to your computer and use it in GitHub Desktop.
Save freeonterminate/6648532 to your computer and use it in GitHub Desktop.
Download ZIP
小木曽
Raw
小木曽.pas
program 小木曽;
uses
System.SysUtils;
type
T小木曽 = record helper for String
function バンバン: String;
end;
function T小木曽.バンバン: String;
begin
Result := Self + 'バンバン';
end;
var
物体: String;
begin
物体 := '机';
Writeln(物体.バンバン);
Readln;
end.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment